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Предисловие 


Автокад является не только графическим редактором, но и мощ- 
ной средой программирования. В 11]-ой версии этого программного 
продукта, частично, и в 12-й версии в полном объеме появилась воз- 
можность разрабатывать приложения на Автолиспе, Си как в защищен- 
' HOM, так и в рсальном режимах, формировать связи атрибутов блоков 
с базами данных для различных СУБД (Paradox, dBASE), программно 
модифицировать строки и разлелы в пользовательских меню, создавать 
диалоговые окна в приложениях на’ языках Си и Автолиспе. Это откры- 
васт широкие возможности для разработки специализированных САПР, 
ориентированных на конкретные приложения. Программы и меню, со- 
ставленные для более ранних версий Автокала, после незначительных 
изменений могут широко использоваться и в 11-Й ив 12-й версиях. 
Необходимость внесения изменений связана с тем, что некоторые ко- 
манды более поздних версий претерпели незначительные изменения и 
их протокол выполнения либо должен быть изменен, либо соответст- 
вующие системные переменные должны быть настроены надлежащим 
образом. Данное пособие может использоваться как для работы с 12-й 
версией Автокада, так и с более ранними версиями, разумеется, с OT- 
дельными ограничениями... | 
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Глава 1 | , 


Автолисп - базовый язык программирования 
в Автокаде 


Все или почти все, что мы делаем в среде Автокада вручную, мож- 
но реализовать программно. Для этого в Автокаде предусмотрено 
несколько механизмов и средств. Это, во-первых, средства создания 
сценариев и, во-вторых, использование языков программирования. 
В Автокалде до 11-ой версии таким языком являлся Автолисп. Поскольку 
он зарекомендовал себя удобным и практичным средством программи- 
рования, Автолисп оставлен и в 12-й версии, и разработчики предпола- 
гают, что совместное использование Автолиспа с языком Си сохранится 
и в дальнейших версиях. Более того, перед тем, как приступить к разра- 
ботке приложений на языке Си, настоятельно рекомендуется ознако- 
миться с принципами и методами создания программ на Автолиспе. 
Поэтому наше изложенйе мы начинаем с языка Автолисп. | 

Булучи частью Автокада, Автолисп позволяет оперировать с пере- 
менными различных типов и передавать их значения командам Автока- 
да при вводе данных. При ответах на запросы команд Автокада можно 
также использовать выражения Автолиспа, в которых могут выполнять- 
ся различные арифметические и условные операции над числовыми 
значениями и значениями определенных переменных. | 

Кроме средств выполнения вычислений Автолисп содержит в себе 
функции, предоставляющие средства доступа к графической базе дан- 
ных текущего чертежа Автокада. Автолисп позволяет также управлять 
графическим редактором Автокада и обращаться к собственным коман- 
лам Автокада. Программы Автолиспа позволяют создавать настроенные | 
на конкретную предметную область применения функции, включающие 
в себя запросы к пользователю (диалог), возможность выбора по усло- 
вию из нескольких вариантов или использования значений по умол- 
чанию. Хотя макроопределения, которые вы можете создавать при Ha- 
писании меню Автокада, могут быть достаточно сложными и мощными, 
без Автолиспа они представляют собой всего лишь комбинации стан- 
дартных команд Автокада. Включением в макроопределения меню 
функций Автолиспа можно превратить меню Автокада в интеллектуаль- 
ное средство автоматизации проектирования. 

Автолисп позволяет: 

è использовать переменные и.выражения при ответах на запросы KO- 
манд Автокала; | 


`e читать и писать внешние файлы, таким образом обмениваясь 
с внешними программами, которые можно запускать из Автокада; 
e создавать различные функции и новые команды Автокала, настраи- 
вая и расширяя таким образом графические возможности Автокала; 
e осуществлять программный доступ (считывание и изменение) 
K данным, относящимся к объектам рисунка, а также таблицам 
Автокада, в которых хранится информация о блоках, слоях, видах, 
стилях и типах линий; 
‚» осуществлять программное управление графическим экраном Авто- 
када и вводом/выводом с различных устройств. 


1.1.. Что такое Автолисп 


Автолисп - это созданный специально для Автокада диалект Лиспа, 
полученный в результате изменения языка CommonLISP. 

Язык LISP разработан в 1961 году американским ученым Дж. Mak- 
карти и является родоначальником функциональных языков. Автолиспй 
‚ относится к так называемым функциональным языкам, т. е. к языкам, 
в основу которых положено понятие функции (в отличие от обычных 
операторных языков программирования - ФОРТРАНа, Паскаля, Си 
и др.). К таким языкам относится также, например, язык Пролог. Все 
вычисления, преобразования и управления программы в функциональ- 
ных языках осуществляются с помощью элементарных (встроенных) 
функций или функций, определяемых программистом при написании 
программы. Программа в целом является суперпозицией некоторых 
функций и, в свою очередь, может быть использована как функция дру- 
гими программами. - 

Язык Лисп идеально подошел для Автокада, “передав”“` Автолиспу 
свои очень удобные средства работы с глубоко структурированной ин- 
формацией. Автолисп - это средство, позволяющее программно рабо- 
тать с объектами Автокала, справочными таблицами, считывать и запи- 
сывать файлы из Автокада. Автолисп можно считать прямым окном 
внутрь Автокада. Кроме того, Автолисп очень прост в изучении и весь- 
ма гибок. 

С введением в Автокад версии 11 Средства разработки приложений 
(СРП) появилась возможность писать приложения и на других языках. 
Однако фирма Autodesk и далее намеревается поддерживать Автолисп, 
рассматривая CPH как дополнение к нему. 
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1.2. Установка Автолиспа 


Автолисп ранних версий поставлялся с каждой копией Автокада, 
имеющей модуль ADE-3. Для операционных систем PC-DOS/MS-DOS 
файл acad.ovl на дистрибутивном диске системы Автокад является OBEP- 
лейным файлом интерпретатора Автолиспа. 

Один из. дистрибутивных дисков. содержит файл с именем 
readme.doc. Следует ознакомиться с содержимым этого файла, посколь- 
ку он содержит все последние изменения и дополнения к документации 
по Автокаду и Автолиспу. | 


Для работы в операционных системах PC-DOS/MS-DOS с 10-й или 
1]-й версией Автокада имеется дополнительная версия Автолиспа, так 
называемый расширенный Автолисп, содержащийся в файлах acadlx.ovi, 
extlisp.exe и remlisp.exe. i 


Обычный (не расширенный) Автолисп может работать Ha любой 
‚машине, на которой работает Автокад версии 10 или Ш с модулем 
ADE-3. Для работы расширенного Автолиспа необходимо также, чтобы 
компьютер был построен на базе микропроцессора типа [ntel $0286 или 
$0356 (не $056 или $038). Для работы расширенного Автолиспа жела- 
тельно, чтобы ваш компьютер имел не менее 512 Кбайт расширенной 
памяти типа ВМ АТ extended memory (не типа Lotus/Intel/Microsoft 
expanded memory), не занятой под другие цели, например под виртуаль- 
ный (электронный) диск. | 

При настройке Автокала одним из рабочих параметров является OT- 
ключение Автолиспа по желанию пользователя. Кроме того, в операци- 
онных системах PC-DOS/MS-DOS конфигуратор 10-й и 11-й версий 
даст возможность отключения расширенного Автолиспа. (Если вы не 
работаете с Автолиспом, на этот вопрос можно безболезненно отвечать 
“Нет”.) | 

В операционных системах PC-DOS/MS-DOS для Автолиспа должна 
быть выделена определенная часть свободной оперативной памяти, объ- 
явленная как память-стек и память-хип, при помощи задания значений 
переменных среды LISPHEAP и LISPSTACK. В случае одновременной 
работы с каким-либо другим прикладным пакетом, например Автокад 
АЕС, следует ознакомиться с содержащимися в его описании рекомен- 
дациями по установке значений переменных среды LISPHEAP 
и ИЗРЗТАСК. Размером области расширенной памяти, которая будет 
использоваться расширенным Автолиспом, можно управлять с помо- 
шью переменной среды LISPXMEM (если переменная $РХМЕМ не 
задана, расширенный Автолисп использует всю оперативную память, 
кроме занятой виртуальным диском). Расширенный Автолисп сообщает 
Автокаду, какую область памяти он использует, тем самым делая эту об- 
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ласть памяти недоступной для использования самим Автокадом. Расши- 
ренный Автолисп не использует хип. | 

Расширенный Автолисп действует как самостоятельная программа 
с именем ЕХТЫ$Р, которую необходимо запустить перед запуском Ав- 
токала. ЕХТЫ$Р является резидентной программой, которая может раз- 
мещаться в расширенной памяти и связывается с Автокадом через овер- 
лейный файл acadxl.ovl. Для автоматического запуска программы 
EXTLISP ее вызов можно поместить в файл настроек системы Автокад, 
acad.bat или даже. (если вы ни с чем, кроме Автокада, на машине не pa- 
ботаете и вас устраивает, что ЕХТЫ$Р будет автоматически загружаться 
в память при включении компьютера) в файл autoexec.bat. 

Программа ЕХТЫ$Р может быть удалена из памяти после 
окончания сеанса работы с Автокадом. Для этого в ответ на подсказку 
DOS следует ввести команлу REMLISP, вызывающую на выполнение 
программу с тем же именем. При этом расширенный Автолисп выгру- 
жается из оперативной памяти. 

Все, что написано в этом пункте, совершенно справедливо для 
Автолиспа, используемого для Автокада 11, предназначенного для IBM 
РС 286. В комплект Автокада 386 11-й и 12-й версий не входит 
ЕХТЫ$Р, и настройками Автолиспа там заниматься особенно не при- 
ходится. 


1.3. Работа с Автолиспом с командной строки 
Автокада о 


К Автолиспу можно обращаться прямо с командной строки Авто- 
када. Когда вы вволите какую-то группу букв, интерпретатор командной 
строки пытается найти введенное вами слово в списке команд Автокада. 
Если введенного слова нет в списке команд, то выдается сообщение об 
ошибке. Напомним лишний раз, что команда Автокада не может содер- 
жать пробелов и нажатие клавиши “ПРОБЕЛ” воспринимается так же, 
как нажатие клавиши “RETURN”. 

Если первым символом вы введете в командной строке круглую 
открывающую скобку, то интерпретатор командной строки Автокада Tie- 
реходит в специальный режим - режим ввода выражения Автолиспа. 
Выход из этого режима осуществляется при вводе скобки, закрывающей 
вводимое выражение (оно может быть сложным и содержать вложенные 
выражения). Работа с клавиатурой в этом режиме имеет несколько OCO- 
° бенностей. Так, нажатие клавиши “ПРОБЕЛ” не рассматривается боль- 
ше как терминатор ввода, поскольку любое выражение Автолиспа CO- 
держит пробелы. Кроме того, выражение Автолиспа может занимать не- 
сколько строчек и поэтому передается вычислителю Автолиспа, только 
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тогда, когда он завершит ввод последней правой скобки. Поэтому, если 
при вводе. вами какого-то выражения Автокад выдаст сообщение “1>”, 
не беспокойтесь - это просто подсказка, которая говорит о том, что для 
правильного завершения ввода функции или выражения необходима 
еще одна правая ‘круглая скобка - “)”. Вообще, ответ Автолиспа типа 
“n>” (п’- целое число) говорит O том, что интерпретатору. Автолиспа 
требуется п закрывающих скобок или кавычек для строковых констант 
(каждая открывающая скобка или кавычка должна иметь свою закры- 
вающую скобку или кавычку). Введите скобку, нажмите “RETURN”, 
затем “CTRL С” и попытайтесь набрать пример еще раз, внимательно. 
следя за балансом скобок и кавычек. Если добавление скобок в ответ на 
этот запрос не помогаст, введите кавычку, a после нее - соответствую- 
MICC количество скобок, потому что если вы забыли кавычку, то все NMO- 
следующие данные (в том числе и круглые скобки) интерпретируются 
как текст и не распознаются вычислителем Автолиспа. Самое трудное в 
Автолиспе - это отслеживать правильные пары скобок и кавычек (“”) 
лля строковых констант. Для этого мы рекомендуем при составлении 
программ использовать текстовые редакторы с возможностью отслежи- 
вания пар скобок. Это может быть, например, Norton Editor. фирмы 
Symantec. 

Повторяя приводимые ниже упражнения на Автокале, вы не увиди- 
те на экране строки “Автолисп возвращает:”, однако все, что написано 
после этой строки; должно появиться на экране. | 

- Автолисп может быть полезен не только как средство программи- 
рования, но и просто как калькулятор, которым можно воспользоваться 
в любой команде Автокада в ответ на запрос ввести какое-то звачение 
или координаты точки. Паралокс, однако, заключается в том, что работа 
с этим “калькулятором” предполагает достаточно свободное владение 
Автолиспом и умение на нем программировать. Исходя из этого, мы 
надеемся, что, изучив эту главу и написав несколько небольших про- 
грамм, вы начнете применять Автолисп в своей повседневной деятель- 
ности и самостоятельно найдете удобные для себя приемы и методы 
использования Автолиспа при интерактивной работе с графическим ре- 
дактором Автокада. 


1.4. Типы данных и переменные 


Автолисп использует переменные. Переменная - это’ просто метка, 
используемая для обращения к изменяемой величине. Вам приходится 
сталкиваться с переменными кажлый день. Например, получаемая вами 
ЗАРИЛАТА формируется из ОКЛАДА, из которого вычитается НАЛОГ, 
и ПРЕМИИ ЗАРПЛАТА, ОКЛАД, НАЛОГ и ПРЕМИЯ - переменные. 
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Автолисп позволяет поставить в соответствие имя переменной и ее 
значение, которое будет потом использоваться в Автолиспе в выражени- 
ях и функциях. 


1.5. Tuns данных Автолиспа 


Благодаря Автолиспу вы имеете. доступ к стандартным системным | 
‚переменным (о них рассказывается в п. 1.4.3) и можете создавать пере- 
менные Автолиспа. Как и любой другой язык программирования, Авто- 
лисп при работе с переменной должен знать, к какому типу данных она 
относится: типом данных определяются операции, которые можно про- 
делать с переменной (например, одно число поделить на другое ‘число, 
но нельзя поделить одну строку на другую). 

Понятие типа данных - ключевое понятие в программировании. 
“Качество” языка программирования, т. е. его потенциальные возмож- 
ности, определяются во многом тем, какие типы данных им поддержи- 
ваются. Перечислим сначала основные типы данных, которые есть 
в любом языке программирования, в том числе и в Автолиспе: 

e СПИСКИ; EF 
СИМВОЛЫ; 
строковые константы; 
действительные числа; 
целые числа; 
дескрипторы файлов; 
“имена” примитивов Автокада; 
наборы Автокада; | 
встроенные функции (Subr); 
внешние функции (функции СРП). 


В программировании на языках семейства Лисп используются сим- 
волы и построенные на них символьные структуры. В собтветствии со 
словарным ‘ определением, символом является опознавательный знак, 
условное обозначение, художественный образ, обозначающий какую- 
либо. мысль; идею и т. п. В нашем случае понятие символа используется 
в более узком и точном смысле: под символом подразумевается запись 
или обозначение. 

Символ - это имя, состоящее из букв, цифр и специальных знаков 
за исключением () - круглых скобок, . - точки, ‘ - апострофа, “ - Ka- 
вычек, ; - точки с запятой. Имя символа обрывается круглыми скобка- 
ми, апострофом, кавычками, точкой с запятой, пробелом или концом 
строки. | | 

Список представляет собой упорядоченную последовательность, 
элементами которой являются атомы или списки.. Списки заключаются 
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в круглые скобки, элементы списка разделяются пробелами. Список 
всегда начинается с открывающейся скобки и заканчивается закрываю-. 
щейся. Атом - это неделимый элемент списка. Понятия списка и атома 
являются ключевыми понятиями языков семейства Лисп. Любые другие 
типы данных являются либо атомами, либо списками. 


Примеры списков: 


(12.6 45.7 77.8) 

(“САТ” “EATS” “MOUSE’”) 

(1 (12 6.78) (“Иван” “Грозный”)) 
(*.25} . 

(setq point ‘(1.0 5.0 6.7)) 


Примеры атомов: 


12.45 
“True Love” 


() 


Строковая константа выглядит как набор печатных символов, за- 
ключенных в кавычки. 

Целые числа в Автолиспе могут быть положительными или отрица- 
тельными (без дробей и десятичной точки). Для определения того, 
включен какой-то режим или нет, Автокад часто использует значения 0 
и l, например если режим ORTHO (ОРТО) включен, то системная ne- 
ременная ОКТНОМОПЕ установлена в единицу. Заметим, что целые 
числа представлены в машине двумя байтами и не могут поэтому выхо- 
дить за диапазон (-3276$, 32767). 

Действительные числа - это положительные или отрицательные 
числа с десятичной точкой. В отличие от многих других языков про- 
` граммирования в Автолиспе не разрешается начинать или заканчивать 
число десятичной точкой. Это связано с существованием в. Автолиспе 
специфического типа данных - точечной пары, разделителем. которой 
является точка. Поэтому, если значение меньше единицы, вы должны 
явно указать 0 перед десятичной точкой (0.123), иначе Автолисп вос- 
примет ошибку (error: invalid dotted pair (ошибка: неверная точечная Na- 
ра). В качестве примеров действительных системных переменных мож- 
но указать. переменные FILLETRAD, LTSCALE и AREA. Диапазон 
представления действительных чисел зависит от типа вашего компьюте- 
ра и в любом случае достаточно велик. Правильно записанными дейст- 
вительными числами являются числа 2.12, 3.11592652543, -92722.121344 
и 1.23544Е+17. 

Требование принадлежности переменной к какому-либо типу дан- 
ных - бич для программиста, и вообще требование, чуждое обыденному 
человеческому мышлению. Ведь тип данных - чистая абстракция, согла- 
шение - уступка вычислительной технике, которая пока еще не слиш- 
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ком-то совершенна. Человек не оперирует понятием “тип данных”, для 
него данные не имеют фиксированного типа (как говорится, с какой 
точки зрения посмотреть), а скорее имеют все типы одновременно: на- 
писанное на бумаге число - это одновременно и группа символов, и 
число, и вообще что угодно, например художественное произведение 
абстрактной живописи. Мы уже говорили, что Автолисп был создан как 
язык, предназначенный для разработок в области искусственного интел- 
лекта, и проблема типа данных в нем в какой-то степени решена. Пере- 
менные в Автолиспе не надо описывать - тип ланных Автолисп опреде- 
ляет автоматически при присвоении переменной значения (те, кто р 
граммировал на ФОРТРАНе или Паскале, оценят это). 

Как уже ясно из примеров, списки - идеальное средство работы со 
сложным ‘образом организованной геометрической информанией. 
Точка, например, не что иное, как список трех действительных чисел. 
Отрезок - список двух точек. Полилиния - список многих вершин (как 
видим, полилиния - геометрический объект, органически вытскающий 
из “идеологии” описания данных Автолиспа). Практически любую 
структурированную информацию можно представить в BIVIC списка, что 
и делается в Автолиспе. Более того, любая определяемая пользователем 
функция Автолиспа (это соответствует полпрограмме в операторных 
языках программирования), вообще говоря, тоже список. 

Типы данных Автолиспа с помощью функции ТУРЕ илентифици- 
руются следующим образом: 


Идентификатор Тип данных . 


INT Целые величины 

REAL Числа с плавающей точкой 

STR Строковые константы 

FILE | Дескрипторы файлов 

SYM Символы | 

LIST Списки и функции пользователя 
SUBR Внутренние функции Автолиспа 
EXSUBR Внешние функции 

ЕМАМЕ Имена примитивов Автокада 
PICKSET ‚Наборы примитивов Автокада 
РАСЕТВ Таблица диспетчера страниц 


Итак, переменная в Автодиспе может быть атомом (целого, вещест- 
венного или строкового типа), а может быть списком. Приведем при- 
мер, в котором формируется список координат точки. 


, 
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Команда: (зе\а а ‘(100 200 300)) 
Автолисп возвращает: (100 200 300) 


В этом примере создается переменная А, которая является CMH- 
ском. В Автолиспе имеются мошные средства работы со списками. 
Позже (см. п. 1.16) мы рассмотрим средства работы со списками Авто- 
лиспа более подробно. 


1.6. Переменные Автолиспа 


Присваивая значение символу (идентификатору, имени перемен- 
ной), вы автоматически создаете переменную (при этом Автолисп фик- 
сирует ее тип). При создании ‘переменной (а точнее, при присвоении 
идентификатору переменной какого-то значения) Автолисп автома- 
тически назначает. ей тип. Переменные Автолиспа совершенно незави- 
симы от системных переменных Автокада и могут повторять их по име- 
нам. При каждом обращении к переменной Автолисп. использует 
то значение переменной, которое было установлено последним. Имя 
переменной может состоять из любых печатных символов (в том числе 
-u цифр), однако не должно включать в себя зарезервированные Авто- 
лиспом символы, поскольку их Автолисп интерпветирует специальным 
образом. Не рекомендуется использовать для имен переменных слелую- 
щие символы: 

e Зарезервированные символы: 

“(С ). или пробел. 

e Знаки операций Автолиспа: | 
Ta T п T G 


Нельзя также использовать в качестве имен переменных имена 

функций Автолиспа. Все имена функций Автолиспа, а также созданные 
пользователем имена переменных хранятся в переменной Автолиспа 
АТОМЫЪ$ЗТ. Выведите на экран содержимое переменной АТОМЫ$Т и 
вы увидите, какие имена вы не можете использовать в своей программе. 
(Это можно сделать вводом с командной строки Автокада команды 
'АТОМЫ$Т.) Некоторые из этих идентификаторов используются 
исключительно вычислителем Автолиспа и не могут быть вами исполь- 
зованы, остальные описаны в “Руководстве по программированию на 
Автолиспе” из комплекта документации, прилагаемой к Атокаду, K KO- 
торому мы рекомендуем вам обращаться за справочной информацией 
о встроенных функциях Автолиспа. 
Заметим, что Автолисп не различает строчные и прописные буквы. 
Поскольку имя переменной длиной более шести символов требует для 
хранения больше памяти, мы не рекомендуем вам превышать этот пре- 
дел. Не следует также начинать имя переменной с цифры. 
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Имена переменных. 


неверные верные 
123 - целое число | RTI 

10.5 = действительная константа txt 

ANGLE  - конфликтует с функцией АМОТ. 
ANGLE 

A(1) - содержит запрещенные Al 
СИМВОЛЫ | 

OLD SUM - содержит пробел OLDSUM 


1.7. Системные переменные Автокада 


Среда графического редактора Автокада позволяет изменять режи- 
мы, персопределять лимиты, менять размеры прицелов объектной при- 
вязки и выбора объектов, получать информацию о различных установ- 
ках графического редактора. 

Установленные вами режимы сохраняются до тех пор. пока вы их 
не переопределите. Сохраняются не только общие настройки (напри- 
мер, размер прицела выбора объектов), но и настройки, относящиеся 
к способу работы с чертежом (единицы измерения, режим отрисовки 
маркеров H T. п.). 

Все настройки графического редактора управляются так называе- 
мыми системными переменными Автокада. Когда вы ‘изменяете уста- 
новки, например включаете или выключасте режим ORTHO (ОРТО), 
изменяете режим. привязки и т. M., Автокад сохраняет только что уста- 
новленный режим в соответствующей системной переменной. Систем- 
ные переменные, таким образом, формируются в процессе работы 
с графическим редактором. Фиксировано не только имя, но и тип сис- 
темной переменной (в вещественную переменную, Нар ер, нельзя за- 
писать строку). = 

Системные переменные делятся на молифицируемые пользователем 
и защищенные. Защищенную переменную нельзя изменять ни Mpo- 
граммно, ни при помощи команды ЗЕТУАК” (УСТПЕРЕМ). Она может 
быть изменена только при выполнении определенной команды. Напри- 
мер, при‘создании нового ‘примитива за границами зоны чертежа, co- 
державшей ранее созданные примитивы, и последующем выполнении 
команлы ПОКАЖИ Границы системные переменные ЕХТММ 
и ЕХТМАХ изменятся и примут новые значения. Те же переменные, 
‘которые не имеют такой защиты, могут быть вами изменены прямо 
в процессе выполнения той или иной команды путем использования 
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команды ‘ЗЕТУАК (‘УСТПЕРЕМ) в прозрачном режиме. Mensa 
значения системных переменных, вы можете управлять многими (прав- 
да, не всеми) режимами графического редактора Автокада. Системные 
переменные также можно разделить по месту их хранения: некоторые 
из них записываются по окончании сеанса редактирования в файл кон- 
фигурации системы, остальные (таких большинство) - в текущий чер- 
теж. Таким образом, файл чертежа Автокада - это не просто описание 
геометрических объектов, а еще и полное описание режимов работы и 
настроек Автокада. Некоторые переменные никуда не записываются. 
потому что никогда не меняются - например, номер версии Автокада 
(переменная АСАБУЕК). 

При помощи команды SETVAR (УСТПЕРЕМ) вы можете в любой 
момент посмотреть текущие установки системных переменных: 


Command:SETVAR 
Variable name ог.?:? 


Команда:УСТПЕРЕМ | 
Имя переменной или ?:? > 


Системные переменные Автокада могут быть считаны или установ- 
лены из Автолиспа, для этого существуют встроенные функции ABTO- 
лиспа getvar и setvar. (Не надо путать функцию setvar Автолиспа и KO- 
манлу ЗЕТУАК Автокада - это совершенно разные вещи.) Для того 
чтобы в программах на Автолиспе не измёнять установки системных. 
переменных, используемые Автокадом по умолчанию, необходимо 
‚считывать (при помощи функции рехаг) значение изменяемой систем-, 
ной переменной, сохранять старое значение и затем (при помощи 
функции setvar) восстанавливать его перед выходом из программы. 
В. макроопределениях также следует восстанавливать старые значения 
системных переменных - это хороший стиль программирования на 
Автолиспе, он поможет вам застраховаться от ошибок. 

Список системных переменных приведен в приложении А. 


1.8.’ Выражения Автолиспа 


Если с точки зрения Автолиспа все, что заключено в круглые скоб- 
ки, считается списком, то как Автолисп отличает данные от управляю- 
ших конструкций - объект, который оперирует данными, от самих дан- 
ных? Дело в том, что любая управляющая конструкция Автолиспа 
содержит объекты специального типа - функции. Функции Автолиспа 
могут быть встроенными или определенными пользователем. Встроен- 
ная функция Автолиспа (subr) - это тип данных, являющийся на самом 
деле ссылкой на некую подпрограмму, которая выполняет над переда- 
ваемыми параметрами некоторые действия. Функция, определенная 
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пользователем, - это обычный сложный список, но все равно он в ко- 
нечном итоге содержит встроенные функции Автолиспа. Для того чтобы 
Автолиспу было проще искать среди элементов списка ‚функции, WX 
принято писать на первом месте. 

Список, в KOMPOM первыл! элементом является имя функции, бен 
называть выражением. Любая функция Автолиспа состоит из выраже- 
ний и сама является выражением. Перечислим основные свойства выра- 
жений (многие из этих свойств обусловлены просто тем, Что любое Bbl- 
ражение - это список). | 

e Каждая открывающая круглая‘скобка должна иметь закрывающую 

e Сразу после открывающей круглой скобки должен стоять иденти- 
фикатор. операции, выполняемой при вычислении выражения (имя 
функции). | 

e Кажлое выражение вычисляется (выполняется), и результат возвра- 
щается. Результатом может быть нуль (nil) или pey orai вычисле- 
ния последнего полвыражения. 

e С логической точки зрения любое возврашаемое значение либо 
истинно, либо. ложно.. Если значение выражения вычислено быть 
не может и возвращается пустое место (nil), то оно считается лож- 
ным. Если значение вычисляется, то Выражение считается MCTHH- 
ным - не-пусто (поп-п|). 

Выражение Автолиспа имеет вид 


(функция аргумент! аргумент2,... аргументМ) 


Здесь функция - имя операции, которая должна быть выполнена. 
K операциям: относятся в том числе и арифметические операции (сло- 
жение. вычитание, умножение, деленис), а также операция присвоения. 
Записывать имя функции нужно сразу же после открывающей скобки 
без пробела. Аргументы представляют собой средство передачи 
значений функции. Аргументами могут быть переменные, константы 
или выражения. Число аргументов функции может быть переменным. 
Например, операция перемножения трех чисел запишется так: (*2 5 $). 
Аргументы могут быть обязательными и необязательными. Если 
при создании: функции было определено, что ее аргументы являются 
обязательными, то Автолисп выдаст ошибку при попытке вызвать функ- 
цию без указания этого аргумента. Однако аргументы могут быть и не- 
обязательными, в этом случае их при вызове функции можно не переда- 
вать. Следует также внимательно следить за типом аргументов: если 
функция производит операции над числами, то ей нельзя передать стро- 
ку, и наоборот. Иначе говоря, если функция (или команда Автокада) 
должна принять в качестве аргумента строку, все символы, введенные в 
ответ на запрос, считаются элементами строки a priori. На первый 
взгляд это не позволяет передать Автокаду выражение Автолиспа в ответ 
на запрос, требующий ввода строки (например, при использовании 
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команды TEXT). Указанную трудность помогает, преодолеть системная 
переменная Автокада ТЕХТЕУАГ.. Установка этой переменной в едини- 
цу (оценка текста включена) приводит к тому, : YTO: Автокад передает 
выражение в Автолисп и печатает ‘возвращаемый результат, а не само 
выражение. Другими словами, если оценка текста включена, то’ в ответ 
на запрос Автокада можно вводить не только сам ответ, но и выражение 
на Автолиспе для его вычисления, используя круглые скобки или‘ вос- 
клицательный знак. 

Выражение анализируется Автолиспом слева направо, пока. не 
встретится закрывающая или открывающая скобка. Если встречается 
закрывающая скобка, то Автолисп завершает анализ выражения, выпол- 
HAET функцию и передает ее значение на более старший уровень BIO- 
женности или в Автокад. Если встречается открывающая скобка, 
АвтолИсп переходит к анализу выражения более младшего уровня. вло- 
женности и, пока не завершит его анализ, не перейдет к дальнейшему 
анализу выражения предыдущего уровня. Таким образом, порядок ана- 
лиза выражений в Автолиспе задан жестко раз и навсегда, что ис- 
ключает путаницу. | 

При описании функций необязательные параметры мы будем 34- 
ключать в квадратные скобки. 


1.9. Функции присвоения 


„Присвоение переменным значений осуществляется в Автолиспе 
не так. как в других языках программирбвания. Для ‘присвоения nepe- 
менным значений в Автолиспе имеется специальная функция SETQ, 
которая присваивает переменной нужное нам значение, т. се. заносит 
указанное нами значение в ячейку с именем переменной. Алгебраичес- 
кая запись присвоения - х = 3. В Автолиспе то же действие записывает- 
ся как (setq x 3). Это связано с тем, что, как уже отмечалось, Автолисп - 
функциональный язык и в нем нет операторов (в том числе и оператора 
присвоения), а есть функции, ‚производящие определенные действия 
над своими параметрами. 

После того как вы присвоили некоторой переменной значение, вы 
можете в любое время посмотреть ее значение с командной строки 
Автокада. Восклицательный знак “!”, введенный с командной строки, 
сообщает интерпретатору командной строки Автокада, что следующий 
за ним идентификатор является именем переменной Автолиспа. Встре- 
тив восклицательный знак, интерпретатор командной строки передает 
следующее за ним имя Автолиспу, который возвращает обратно значе- 
ние переменной с этим именем. 
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Что такое SET - понятно: “положить”, а что означает SETQ? Зага- 
дочная буква “а” в функции присвоения ЗЕТО происходит от сокраще- 
ния английского слова “ацо{е” - буквально “цитировать”. Функция 
ЗЕТО является мнемоническим сокращением английского словосочета- 
ния “SET by Quote” - “присвоить по ссылке”. Прежде чем разобраться, 
что это означает, нужно понять, как хранятся в машине значения пере- 
‚менной. Дело в том, что переменная и ее значение не одно и ‘то же. 
На первый взгляд такое утверждение кажется тривиальным, однако KO- 
гда мы говорим “переменная”, то чаще всего подразумеваем “значение, 
которое хранится в. переменной”. Специфика Автолиспа заключается 
в том, YTO в переменной может храниться не только значение, но и це- 
лое выражение, а ссли быть точным, то его адрес. Функция SETQ 
` позволяет об этом не задумываться и считает, что мы обращаемся 
к значению переменной. В одной функции ЗЕТО можно осуществить 


u 


несколько присваивании: 
(setq а “Новый” b 3.14'c ‘(34.0 77.6 55.4) 


Однако в Автолиспе есть также функция SET, которая считает, что 
мы обращаемся к самой переменной. Прежде чем проиллюстрировать 
сказанное на примерах, отметим, что для обращения к значению пере- 
. менной в Автолиспе существует специальная функция > (quote выраже- 
ние); которая возвращает само‘ выражение, не выполняя его (фактичес- 
ки возвращает ссылку на выражение). Эта функция очень часто’ исполь- 
зуется в Автолиспе и поэтому имеет сокращенную запись: ‘выражение. 
Так, (quote А) эквивалентно ‘А. 

Теперь продемонстрируем работу функций SETQ и SEF: 


(set ‘А 5.0) 
Возвращает 5.0 и присваивает это значение А. 
Эта запись ‘эквивалентна записи (setq а 5.0) 
(set ‘В ‘(А + С)) | а. 


Возвращает выражение (А+С) и присваивает его В. 

Итак, в переменной хранится. выражение! Причем это именно вы- 
ражение, а не текстовая константа - изменяя значения переменных А 
и С, мы изменяем тем самым значение переменной В. Эта запись экви- 
валентна записи | 
(setq B (А+ С)) 


‚Обратившись к специальной + ФУНКЦИИ EVAL (“еуашае” - “оцени- 
вать”), можно в любой момент вычислить выражение В. Предположим, 
` {YTO перед выполнением предыдущей строки мы положили (setq А. 3) 
и (setq С 6). Тогда 


(eval В) 
Возвращает 9, 


"ДИАЛОГ.-МИФИ” 17 


‘ 


Если две переменные “вложены” друг в друга, то к младшей можно 
обращаться через старшую, т. е. косвенно. Выполните следующую по- 
следовательность функций: 


(set 'B ʻA) 
Устанавливает A B В и возвращает A, 
(set В 640) 


Устанавливает А в 640 и возвращает 640. 
По сути, в функции (set В 640) сначала вычисляется значение В, 
потом результату этого вычисления присваивается 640. 


1.10. Математические функции 


Автолисп включает в себя достаточно широкий набор встроенных 
функций, позволяющих производить математические вычисления. Аргу- 
ментами математических функций являются числа, которые могут быть 
как целыми, так и вещественными. Если все аргументы - целые числа, 
то результат операции также будет целым числом, а любая дробная 
часть будет опущена. Если хотя бы. один аргумент - вещественное чис- 
ло, то результат операции будет вещественным числом. (Следует отме- 
тить, например, что число 2.0 считается вещественным, поскольку 
в нем присутствует десятичная точка.) К математическим функциям 
относятся: 


Функция | Назначение 


(+ число] число. ...) Возвращает сумму всех аргументов 


(- число! число...)  Вычитает число2 из числа| и возвращает 
разность. Если задано более двух аргументов, 
то из первого аргумента вычитается сумма всех 
остальных. Если задан один аргумент, то он 
вычитается из нуля (инвертируется его знак) 


(* число число. ...) Возвращает произведение всех чисел 


(/ число! число) ...) Делит число] на число? и возвращает частное. 
Если задано более двух аргументов, то первое 
число делится на произведение всех остальных 


(1+ число) Увеличение целого или’‘действительного 
аргумента на единицу 


(1- число) _ Уменьшение целого или действительного 
° аргумента на единицу 


(atan число! [число2]) Если не задано число2, то возвращает арктан- 
генс переменной число] в радианах, область 
допустимых значений - [pi,-pi] радиан. Если 
заданы оба числа, то возвращается арктангенс 
переменной число|/число2 в радианах. Если 
число2 - нуль, то в зависимости от знака 
переменной число| возвращается + или - 
1.570796 радиан (+90 или -90) 


(abs число) Вычисление абсолютного значения 
действительного или целого числа 


(sin число) Возвращает значение синуса угла, заданного 
аргументом в радианах 

(cos число) Возвращает значение косинуса угла, заданного 
аргументом в радианах 

(exp степень) _ Вычисляет значение экспоненциальной функ- 
ции с основанием е и аргументом, равным 
числу | 

(expt основание Вычисляет значение экспоненциальной 

степень) функции с указанными основанием и степенью 

(gcd число! число?) Возвращает наибольший общий делитель 
(Greatest Common Denominator) указанных 
аргументов 

(log число) Возвращает натуральный логарифм аргумента 


(max число! число...) Возвращает наибольший аргумент. Эта функ- 
ция в отличие от многих других не изменяет 
типов чисел 


(min число] число2 ...) Возвращает наименьший аргумент. Не изме- 
няет типов чисел 


(rem число| число2 ...) Возвращает остаток (Remainder) от деления 
переменной число] на переменную число? 
(математическая запись: число] mod число2) 


(sqrt число) Извлекает квадратный корень из аргумента. 
Возвращаемый результат всегда вещественный 


(Ish число! числобит) Возвращает побитовый сдвиг числа] на число 
числобит. Оба аргумента должны быть целыми, 
результат тоже будет целым. Если числобит 
положительно, то число| сдвигается влево (оно 
умножается на 2 в степени числобит), если 
отрицательно - сдвигается вправо (делится на 2 
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степени числобит нацело с отбрасыванием 
остатка). В каждом случае “нулевые” биты 
добавляются, а сдвигаемые биты сбрасываются. 
Если “единичный” бит сдвигается в высший, 
16-й разряд целого числа, знак числа меняется 


pi paa Константа, равная 3.1415926 


Функции Автолиспа 


могут быть, за очень редким исключением, 


вложенными. Например, чтобы вычислить корень квадратный из суммы 
квадратов двух чисел, можно записать 


(seta а (sart (+ (* сс) (* b b)))) 


1.11. Работа со строками, функции преобразования 


Среди встроенных функций Автолиспа, работающих со строками, 
можно найти практически все, что имеется в любом развитом языке 


высокого уровня: 


Функция 
(itoa целос) 


(atoi строка) 
(atof строка) 


(strcase строка признак) 


(substr строка целое] 
целое?) 


(strlen строка) 


(strcat строка! строка2 ...) 
(chr число) 
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Назначение 

Возвращает результат преобразования целого 
числа в строковую константу 

Возвращает преобразование строковой кон- 
станты в целое число 


Возврашает преобразование строковой кон- 
станты в действительное число 

Переводит все символы аргумента строка 

в нижний регистр, если признак не nil, если 
признак опущен или равен nil - в верхний 
Возвращает полстроку аргумента строка, Ha- 
чинающегося с символа целое] и длиной це- 
лое2. Первый символ строки имеет номер 1 
Возвращает длину в символах аргумента 
строка 

Осуществляет сцепление аргументов строка 


‘Возвращает результат преобразования целого 


числа в символьный код ASCII, причем резуль- ` 
татом является строковая константа. Например, 
(clhir 65) возвратит символ (строковую KOH- 
станту) “A” (подобным образом действует фун- 
KIMA CHR$ в языке Бейсик) 


(ascii строка) 


| 


Возвращает преобразование одного символа, 
указываемого в виде строковой константы, 
в кол ASCII 


В любой момент можно преобразовать целое число в действитель- 


ное и наоборот: _ 


Функция 
(fix число) 


(float число) 


{поз число [режим 
[точность] ]) 


(type элемент) 


Назначение 


Возвращает результат преобразования действитель- 
ного числа в целое, Преобразование осуществляется 
усечением (отбрасыванием) дробной части 


Возвращает результат преобразования целого числа 
в действительное 


Возвращает текстовую строку, которая представляет 
число (вещественная` величина) в соответствии со 
значениями режима, точности и системной пере- 
менной Автокада DIMZIN. 


Режим и точность - иелые числа, которые Ha- 
значают режим представления числа и его точность: 
Режим RTOS Описание 
Научный 
Десятичный 
| Инженерный (футы и десятичные 
дюймы) 
+ Архитектурный (футы и дробные 
дюймы) 
5 Произвольные дробные части 
Аргументы режим и точность соответствуют систем- ` 
ным переменным Автокада LUNITS и ГОРКЕС. 
Если эти аргументы отсутствуют, то используются 
текущие значения LUNITS и ЪЫРКЕС 


> № „ 


Возвращает тип элемента 


Используя функцию type (о ней уже говорилось 
выше), можно определить тип элемента. 
Пример использования функции ТУРЕ: 
(defun isint (а) 
(if (= (type а) ЧМТ) ; является ли а целым? 
T ‚ если да - возвращаем ИСТИНУ. 
‚ nil ‚ если нет - возвращаем nil 
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1.12. Использование функций GET для ввода данных 


Для ввода данных с клавиатуры в Автолиспе существует семейство 
функций СЕТ. Для всех основных типов данных есть своя функция 
СЕТ. Все аргументы функций этого семейства необязательны. В качест-' 
ве первого аргумента иногда выступает необязательная двумерная точка 
в текущей ПСК. Все функции СЕТ могут иметь в качестве аргумента 
произвольную строковую константу, в которой может содержаться текст 
запроса или какая-то подсказка, выводимая при запросе пользователю 
ввести какие-то данные. Все функции СЕТ ожидают ответа пользовате- 
ля, т. е. приостанавливают выполнение программы до тех пор, пока не 
будет осуществлен ввод (нажата клавиша “КЕТОКМ”). Ввод может быть 
осуществлен как с клавиатуры, так и при помощи устройства указания. 
Вводя точки с экрана, вы можете захотеть, чтобы в процессе перемещс- 
ния курсора по экрану Автокад показывал “резиновую” линию. Это по- 
зволяют делать практически все функции семейства СЕТ. Все вводимые 
данные автоматически преобразуются в нужный тип данных. В ответ ‚на 
запрос функций семейства СЕТ нельзя вводить выражение Автолиспа: 
это приведет к ошибке и выводу сообщения “Can’t reenter AutoLISP” 
(“Не могу войти в Автолисп повторно“). В макроопределениях меню 
функции СЕТ нужно выделять обратной косой чертой с тем, чтобы 
Автокад обеспечил паузы для ввода данных. Вот список этих функций: 


[getangle [точка] [текст запроса-подсказки]) 


Возврашает угол в радианах между задаваемым пользователем век- 
тором и положительным направлением оси X в текущей плоскости MO- 
строений. Функция всегда возвращает угол в ралианах вне зависимости 
от текущей. установки переменных. Начальная точка вектора может быть 
_ определена первым аргументом функции. Вторую точку всктора можно 
указать на экране мышью, при этом Автокад нарисует “резиновую” ли- 
нию от точки, указанной первым аргументом, до текущего положения 
курсора. Если первый аргумент опущен, Автокад потребует ввола двух 
точек. Не запрещается указывать трехмерные точки (см. также функцию 
GETORIENT). | 


[getcorner точка ["текст запроса-подсказки”] 


Эта функция, так же как и getpoint, возвращает координаты указан- 
ной пользователем точки 8 текущей ПСК. Отличие от getpoint 3a- 
ключается в том, что функция весогпег строит “резиновую” рамку при 
передвижении курсора по экрану, первый угол которой может быть оп- 
ределен первым аргументом функции. В этой функции первый аргумент 
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обязателен. Если вводится трехмерная точка, то координата 7, игнориру- 
ется (см. функции getpoint и getdist). 


[getdist [точка] [текст запроса-подсказки] 


Какими бы ни были текущие единицы измерения (например, фу- 
ты), эта функция всегда возвращает действительное число. Если pac- 
стояние указывается с клавиатуры, функция тестирует значения систем- 
ной переменной FLATLAND и флага трехмерных точек функции 
INITGET. Как видим из таблицы, если системная переменная 
FLATLAND установлена в единицу, а флаг “трехмерные точки” функ- 
ции INITGET не установлен, то функция getdist будет обрабатывать за- 
даваемую трехмерную точку как ABYMEPHYIO. просцируя ее на текушую 


FLATLAND INITGET Возвращается ли расстояние 
между трехмерными точками? 
] Да i 
0 Да 
l Да 
0 Нет 


— = O © 


В Автокаде 11-й версии системная FLATLAND переменная всегла 
установлена в нуль. ‹ Поэтому управление функцией GETDIST происхо- 
дит иначе. (См. описание функции ПМТОЕТ.) 


(де!епу имя_переменной) 


Возвращает строковое значение, присвоенное переменной среды 
DOS. Здесь имя переменной - строковая константа, представляющая 
собой имя переменной среды. Если эта переменная не определена, 
возвращается nil. 


[getint [текст запроса-подсказки]) 


Ввод целого числа. 


[getkword [текст запроса-подсказки] 


Запрашивает у пользователя ключевое слово, определенное ранее 
при помощи функции INITGET. Если ответ не совпадает ни с одним 
определенным ключевым словом, Автокад попросит повторить ввод. 
Если ответ совпадает с ключевым словом, функция СЕТКУ/ОКО воз- 
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вращает это ключевое слово как строковую. константу. Пустой ввод, 
если разрешен, возвращает nil. 


Пример: 
(initget 1 “Yes No”) | 
(setq x (getkword “Are you sure? Yes/No “)} 


запросит пользователя и установит в символ Х либо “Yes” ‚ либо “No” 
в зависимости от ответа. Можно отвечать только одной начальной 
буквой и неважно, строчной или прописной. В данной ситуации пустой 
ввод He разрешен, поэтому при неправильном ответе Автокад попросит 
повторить ввод. 


[getorient [точка] [текст запроса-подсказки]' 


То же, что и СЕТАМОГЕ, однако измерение угла осуществляется 
относительно текущего направления измерения`углов, а не относитель- 
но нулевого направления оси Х (абсолютный угол, в отличие от 
СЕТАМОЕЕ, которая измеряет относительный угол: угол относительно 
нулевого направления оси Х). | 


[getpoint [точка] [текст запроса-подскозки]) 


Позволяет. ввести. точку. Если первый аргумент присутствует, Авто- 
кад рисует “резиновую” линию от точки, определяемой первым аргу- 
ментом. Указание трехмерных точек обрабатывается так же, каки в 
функции GETDIST. 


[getreal [текст запроса-подсказки]) 


Позволяет вводить действительное число. Ввод: может быть осущес- 
твлен только с клавиатуры (или через планшет). 


[getstring [флагпробела] [подсказка] 


Запрашивает строковую константу и возвращает ее. Если строка 
длиннее 132 символов; то возвращаются первые ‚ 132 символа. Если 
в введенной строке имеются символы обратной косой черты, то они за- 
меняются на две обратные косые черты. 

Если флаг пробела присутствует и не равен nil, вводимая’ строка 
может содержать пробелы и завершением ввода считается нажатие кла- 
виши “КЕТОКМ”. и. 


2s 


[getvar имяпеременной) 
| | 


Возвращает значение системной. переменной Автокада. Имя nepe- 
менной должно быть. заключено в кавычки (см. функцию ЗЕТУАК). 

Как видим, функции семейства СЕТ имеют много общего. Ho кро- 
ме сходства их объединяет то, что все режимы ввода устанавливаются 
одной и той же функцией ПУТОЕТ: 


linitget [биты] [строка]) 


`Данная функция устанавливает различные режимы, в’ которых 
работают все функции, семейства СЕТ, кроме функций GETSTRING 
и СЕТУАК. Возврашается. всегла nil. Биты - необязательное. целое 
число, биты. которого. интерпретируются следующим образом: 


Бит INITGET Значение бита 


l Запрещение пустого ввода 
id Запрещение ввода нуля 

4 | Запрещение ввода отрицательных чисел 

S Не контролируются лимиты, даже если включена 

системная переменная LIMCH ЕСК | 

16 Возврашаются не двумерные, а трехмерные точки 

32 Резиновая” линия и рамка рисуются пунктиром 

64 Игнорируется координата 2, трехмерной точки 

© (только в СЕТОТЗТ Автокада 11 и 12) | 
12$ ° Возвращается произвольный код с клавиатуры 


(для 12-й версии) 


Биты задаются целыми значениями, являющимися степенями двойки, 
как показано в таблице, и общее целое число формируется путем сложе- 
ния желаемых целых чисел. (Получается логическое И битов.) Следует u3- 
бегать установки недокументированных битов, поскольку последние вер- 
сии Автокада могут их использовать. Если установленные для ввода пра- 
вила не выполнены, то Автокад попросит повторить 6600. Управляющие 
биты воспринимаются теми функциями, для которых они имеют смысл. 


Второй аргумент функции INITGET, строка, используется для за- 
дания списка ключевых слов при вводе. Использование ключевых слов 
описано выше. 
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1.13. Логические функции Автолиспа 


Автолисп` предоставляет богатые возможности конструирования JIO- 
гических выражений и выполнения над ними логических операций. 

Логический оператор - это функция, сравнивающая между собой 
два или больше аргумента. Результат сравнения (т. е. некоторое утверж- 
дение, касающееся двух аргументов) может ‘быть либо истиной (T), либо 
ложью (nil). Основные логические функции - это И (AND), ИЛИ (ОК) 


и НЕ (МОТ): 


Логическое выражение 


Результат 


(and выражение] 
выражение2 ...) 


(по{ элемент). 


(ог выражение] 
выражение ...) 


(= arom] атом2 ...) 
(/= атом [ атом2) 

(< атом1 атом2 ...) 
(<= атом! атом2 ...) 


(> атом1 атом2 ...) 


Возвращает результат выполнения логического И нал 
списком выражений. Возвращается nil, если любое 
(хотя бы одно) из выражений имеет значение nil, 

в противном случае - Т 


Возвращает результат выполнения логического НЕ 
над своим аргументом 


Возвращает результат выполнения логического 
ИЛИ нал списком выражений. Возвращается nil, 
если все аргументы имеют значение nil; если при 
оценке аргументов слева направо встречается 
выражение не - nil, возвращается T 


Возвращает T, если все атомы равны, в противном 


‚ случае возвращается nil 


Возвращает T, если атом1 не равен атому2. 
В противном случае возвращается nil. Функция 
не определена для числа аргументов большего двух 


Возвращается Т в том случае, если каждый после- 
дующий атом меныше предылущего. В противном 
случае возвращается nil 


Возвращается Т в том ‘случае, если каждый после- 
лующий атом меньше или равен предыдущему. 
В противном случае возвращается nil 


Возвращается Т в том случае, если каждый после- 
дующий атом больше предыдущего. В противном 


‚ случае возвращается nil 


(>= атом1 атом. ...) 


(eq выражение] 
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Возвращается Т в том случае, если каждый после- 
дующий атом больше или равен предыдущему. 
В противном случае возвращается nil 


Определяет, идентичны ли выражение] и выраже- 


выражение?) 


(equal выражение] 
выражение2 


[допуск]) 


_"ДИАЛОГ.МИФИ"* 


ние2, т. €. являются ли они фактически одним 
объектом или нет (т. е. порожден ли один из дру- 
гого при помощи функции SETQ). ЕО возвращает 
T, если оба выражения идентичны, в противном 


случае - nil. Обычно функция применяется для ON- 


ределения, являются ли два списка фактически 
одним или нет. Например, пусть 

(setq f1 ‘(а b с)) 

(setq f2 '(a b c)) 

(setq f3 f2) 

Тогда (eq f1 f3) возвращает nil (fl и f3 - разные 
списки), a (eq {3 f2) возвращает T (f3 и Г? - один _ 
и тот же список) (См: также ниже функцию 
EQUAL.) i 


Определяет, равны ли выражение] и выражение2, 


т. е. равны ли их значения. Например, пусть 

(setq f1 ‘(аб с)) 

(setq f2 ‘(абс)) 

(setq f3 f2) 

Тогда (equal f1 f3) возвращает T (значением fl n В 
является одно и то же ), а (equal f3 f2) возвращает 
T (f3 n - в точности один и тот же список). 
Заметим, что, если оба списка EQUAL, они могут 
не быть EQ. Атомы, которые EQUAL, всегда к 
тому же ЕО. Добавим, что два списка, которые 
ЕО, всегда EQUAL. 

При сравнении двух действительных чисел (или 
двух списков действительных чисел, например то- 
чек) важно осознавать, что два “илентичных” 
числа могут незначительно отличаться друг от дру- 
га, если они вычислялись различными методами. 
Однако факультативный численный аргумент до- 
пуск позволяет задать максимальную точность, 

с которой могут отличаться друг от друга выраже- 
ние| и выражение2, оставаясь при этом EQUAL. 
Например, пусть 

(setq а 1.123456) 

(setq b 1.123457) 

Тогда 

(equal а Б)возвращает nil 

(equal а b 0.000001) возвращает T 
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Кроме логических операций, производимых над выражениями как 
над целыми объектами, Автолисп включает в себя встроенные функции, ` 
производящие логические операции побитово над целыми числами: 


Логическая операция 


(~ целое) 


(Boole кодфункции 
целое| целое2 ...) 


(minusp элемент) 


(егор элемент) 
(numberp элемент) 


(logand число 
число ...) 
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Результат 


Возвращает логическое НЕТ (дополнение до еди- 
ницы) своего аргумента. Аргумент должен быть 
целым числом 


Определяет битовую функцию Булевой алгебры, 
производимой над двумя целыми аргументами. 
Функции кодируются следующим образом: 


Целое] Целое2 Функция 
0. о. $ 
0 | 4 
l 0 2 


l | l l | 
Некоторые значения этой функции эквивалентны 
стандартным булевым операциям: 


Код функции — Булева Функция 
о И | 
6 Исключающее ИЛИ 
г ИЛИ 
$ НЕТ 


Функция возвращает T, если элемент является 
целым или действительным отрицательным числом. 
В противном случае возвращается nil 


Функция возвращает T, если элемент является целым 
или действительным нулем. Иначе возвращается nil 


Функция возврашает T, если элемент является целым 
или действительным числом. Иначе возвращается nil 


Функция возвращает результат ‘действия побитово- 
го И над списком чисел. Числа должны быть пелы- 
ми, и результат будет целым. Работает функция 
следующим образом. Каждое число представляется 
в двоичном виде; затем соответствующие разряды 
чисел собираются в список. Если в этом списке 
находится хотя бы один нуль, соответствующий 
разряд результирующего числа будет нулем; если 

в списке все единицы, разряд результирующего 


числа равен единице 


(1юртог число ° Функция возвращает результат действия побитово- 

число ...) ‚ го ИЛИ над списком чисел. Числа должны быть 
целыми, и результат будет тоже целым. В этой 
функции каждое число также представляется в дво- 
ичном виде; затем соответствующие разряды чисел 
собираются в список. Если в этом списке находит- 
ся хотя бы одна единица, соответствующий разряд 
результирующего числа будет единицей; если 
в списке все нули, разряд результирующего числа 
равен нулю 


(Ир элемент) Возвращает T, если элемент является списком, 
в противном случае - nil 


(atom элемент) Возврашает nil, если элемент является списком, 
в противном случае - Т. Любой элемент, который 
не является списком, считается атомом 


(null элемент) Функция возвращает T, если элемент вычисляется 
B nil, противном случае - nil ` 


(боипар атом) Функция возвращает T, если атом имеет ВЫ 
значение, в противном случае - nil 


1.14. Условное ветвление программ 


Каждая программа имест свою логическую структуру. Ветвление - 
это способ управления ходом выполнения программы. Условные опера- 
торы - это средство управления вствлением программ. Автолисп имест 
две функции ветвления, IF и COND. Условное ветвление подразумевает. 
проверку какого-то условия, по результатам которой осуществляется пе- 
реход. Условия содержатся в условных выражениях, использующих опе- 
‚ раторы отношения и логические операторы. Условные выражения могут 
содержать любые выражения Автолиспа. 


[cond [тест] результат! ...] ...] 


Воспринимает в качестве аргументов любое число списков. Она 
оценивает по очереди первые элементы списков до тех пор, пока не 
встретится элемент, отличный от nil. Затем вычисляется то выражение, 
которое следует за тестом, и возвращается значение последнего выраже- 
ния в субсписке. Если в субсписке только одно выражение (например, 
результат отсутствует), то ‘возвращается значение выражения TECT. 
COND - основная функция условия в Автолиспе. Как видно из следую- 
щего примера, в котором функция COND возвращает нуль или единицу 
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в зависимости от введенной пользователем строковой переменной $, эта 
функция может использоваться.в качестве условного оператора пере- 
ключения (“сазе” во многих языках программирования): 


(cond ((= $ “\”) 1) 
$ “У”) 1) 

((= $ “Д”) +) 
$ “Д”) 1) 
$ “N”) 0) 

((= $ “n”) 0) 
((= $ “Н”) 0) 
((= $ “н”) 0) 


[if тест-выражение выражение-тогда выражение-иначе] 


Эта функция использует выражение по условию. Если тест-выраже- 
ние не nil, то исполняется выражение-тогда, в противном случае - выра- 
жение-иначе. ‘Последнее выражение не обязательно. Возвращает значе- 
ние выполненного по условию выражения; если выраженис-иначс 
отсутствует и тест-выражение - nil, то IF возвращает nil. 

Иногда требуется по условию выполнить не одно, а несколько вы- 
’ ражений, в то время как функция IF не позволяет этого. В этом случае 
используют функцию РКОСМ, которая последовательно вычисляет KA- 

ждое ‘выражение и возвращает значение последнего: (ргорп` выражение] 
`’ выражение2 ...). Например: 
(if (= аЪ) (ргодп 
(setq а (+ а 10)) 
(setq b (- b 10)) 
) 


1.15. Организация циклов 


Как и многие языки программирования, Автолиси имест средства 
организации повтора выполнения групп операторов. Циклы полезны, 
например: 

® ДЛЯ уменьшения числа операторов в программе (в случае повтора 
однотипных действий); | 

è для повтора выполнения процедуры до отмены ее пользователем; 

e для получения решения математической задачи со сходимостью; 

èe ДЛЯ Пакетной обработки списков данных (например, при работе 
ОХЕ-файлом). 
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Оператор организации циклов Автолиспа аналогичны командам. 
циклов в других структурных языках. Следует отметить, однако, 
определенную бедность Автолиспа в’ этом отношении, обусловлениую, 
вероятно, его спецификой. 

Простейшим оператором повтора является оператор КЕРЕАТ. Эта 
функция повторяет любое число операторов указанное число, раз. 
Возвращается последнее значение последнего выражения цикла. Син- 
таксис: 


(repeat число выражение1 выражение ...) 


Функция WHILE похожа на функцию REPEAT, однако число no- 
втора не определено, а выход из цикла осуществляется по условию. 
В отличие от структуры IF оператор WHILE не включает в себя выпол- 
нение какого-либо выражения в том случае, если условие не выполняет- 
ся. Как COND, REPEAT и РКОСМ, WHILE позволяет включать в свое 
тело неограниченное число операторов. В начале выполнения каждого 
цикла проверяется условие и, если оно выполняется, выполнястся тело 
цикла, после чего опять проверяется условие, и так до тех пор, пока вы- 
ражение-условие не станет ложным. Бульте внимательными: неаккурат- 
HOC использование цикла WHILE может привести к зацпикливанию про- 
граммы. Цикл WHILE возвращает значение последнего вычисленного 
перед выходом из цикла выражения, Если выраженис-условие изначаль- 
но было ложным. и вхождения в тело цикла не было, WHILE возвращает 
nil. Функцию WHILE удобно использовать для проверки правильности 
ввода, зацикливая ввод до тех пор, пока введенные данные не будут 
удовлетворять каким-то условиям (прежде чем использовать для этих 
целей функцию WHILE, убедитесь, что ту же задачу ‘нельзя решить 
обычными средствами Автолиспа - getkword). Цикл WHIŁE можно nc- 
пользовать также для организации итераций. Итерация - это процесс. 
повторения группы вычислений до тех пор, ‚пока результат вычисления 
одного или более выражений не станет удовлетворять какому-то усло- 
вию. Условное выражение итерационного цикла WHILE обычно содер- 
жит некоторую переменную, значение которой изменяется в процессе 
выполнения тела цикла. Синтаксис WHILE: 


(while тест-выражение выражение] выражение2 ...) 


Еще одним типом функции - организатора цикла является функция 
FOREACH (буквально. “для каждого”). Это специальное средство 
Автолиспа, предназначенное для работы со списками. Синтаксис: | 


(foreach имя список выражение1 выражение2 ...) 


Эта функция, проходя по списку, присваивает каждому элементу 
имя и вычисляет каждое выражение для каждого элемента ‘списка. 
Может быть задано неограниченное число выражений. Возвращается 
результат последнего вычисленного выражения. Например, 


(foreach п ‘(аб с) (print п)) 
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эквивалентно 


(print a) 

(print b) 

(print c) 

с той разницей, что FOREACH возвращает только значение последнего 
вычисленного выражения. 


(арру функция список) 

Данная функция выполняет функцию с аргументом, заданным 
списком. 

Для выполнения какой-либо одной операции над. всеми элемен- 
TAMH одного или нескольких списков служит функция` 


(mapcar функция список1 список2....списокМ) 


Число списков должно соответствовать числу аргументов, -требую- 
шихся для функции. Функции возвращают список результатов. 
Если вам необходимо использовать свою функцию. она’ должна 
быть заранее определена с помошью DEFUN. Однако в Автолиспе ссть 
механизм создания так называемой анонимной функции 


(lambda аргументы выражение ....) | 
Она применяется вместе с МАРСАК и APPLY. 


Примеры: 
(apply ‘+ ‘(1 2 3)) возвращает 6 
(apply ‘(lambda (ху 2) | 
(* x (- yz) 
) 
(5 20 14) 
) возвращает 30 


(mapcar ‘(lambda x y) 
(7 (+ xY) 2.0)) 
'{(123)(567) 
) ’ возвращает {3 4 5) 

Самым значительным отличием языков семейства Лисп от других 
языков высокого уровня является возможность конструирования функ- 
ций языка самой программой. Сначала вы можете составить выражение, 
а затем его выполнить. Для выполнения сконструированного выражения 
служит функция 


(eval выражение) . 
Пример: 


(setq а ‘(тах)) | 
(while (not (setq b (дегеа! “\Введите число: “))) 
(setq а (cons Ба))) | 
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(setq а (reverse а) 
(eval а) 


В этом достаточно сложном примере последовательно вводятся 
числа, заносимые в список до тех пор, пока их ряд не закончится пус- 
тым вводом. В конце списка ‘оказалось MMA функции МАХ. Затем этот 
список переворачивается так, чтобы имя функции оказалось на первом 
месте. Применение функции EVAL к полученному списку возвращает 
максимальное из введенных чисел. 


1.16. Вызов команд 'Автокада из программы 
на Автолиспе 


Ввод данных в программу на Автолиспе и вспомогательные вычис- 
ления над ними призваны служить автоматизации проектирования. 
Поэтому в Автолиспе не может не быть средства, позволяющего обра- 
щаться к командам Автокала. из программ пользователя. Таким средст- 
вом является функция Автолиспа COMMAND: 


(command аргумент! аргумент2 ...) 


Эта функция выполняет команлу Автокада из Автолиспа и всегда 
возвращает nil. Аргументы представляют собой команды Автокала и их 
опций; каждый аргумент вычисляется и посылается в Автокад как ответ 
на соответствующий: запрос. Имена команд и опции представляются как 
строковые константы, двумерные и трехмерные точки -. соответственно 
как списки из лвух или трех действительных чисел. Пустая строка фун- 
кции СОММАМО равносильна нажатию пробела на клавиатуре. Вызов 
COMMAND без аргументов равносилен нажатию “CTRL С” с клавиату- 
ры и прерывает большинство команд Автокала. 

Если переменная Автокала СМРЕСНО установлена в нуль. то при 
выполнении этой функции’ на экран не будет выводиться выполнение 
команды Автокала. | 

На использование этой функции налагаются некоторые ограни- 
чения: | 

e функции семейства GET не могут быть вложены в функцию 
COMMAND. Следует присваивать все необходимые значения nepe- 
менным заранее; 

'@ с помощью функции COMMAND нельзя работать с такими коман- 
дами Автокада, как ДТЕКСТ, ЭСКИЗ в 10, Пи 12-й версиях и 
ЧЕРТИ, ПЕЧАТАЙ и ПАКЕТ в 10-й и 11-й версиях, а также с KO- 
мандами, объявленными пользователем (defun С:команла). В 12-й 
версии команда ПАКЕТ должна быть в программе последней; 

© нельзя использовать восклицательный знак для указания команде 
Автокада значения переменной. 
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Если в строке. аргументов команды, вызываемой функцией 
COMMAND, встречается ключевое слово’, “Раизе”, то функция 
COMMAND приостановит свое действие, чтобы пользователь непосред- 
ственно ввел значение (или произвел отслеживание). В этот момент 
можно выполнить “прозрачную” команду, после чего выполнение 
функции COMMAND возобновится. Это позволяет, в частности, в про- 
цессе выполнения функции COMMAND использовать команды 
‘ПОКАЖИ, ‘ПАН и др. Пауза. будет длиться до тех пор, пока не будет 
введен допустимый аргумент и пока не выполнятся все “прозрачные” 
команды. При этом, если функция COMMAND требует ввода, запрос 
может быть удовлетворен с помошью меню. Для приостановления дей- 
ствия меню следует указать обратную косую черту. 


Gara Специальные функции 


Из Автолиспа можно управлять некоторыми режимами графичес- 
кого редактора не обрашаясь к функциям Автокада. К встроенным фун- 
KUHAM Автолиспа, управляющим графическим редактором, можно отнс- 
сти следующие функнии: 


[graphscr]} .. 


Переключает экран из текстового режима в графический в системах 
с одним экраном (эквивалентна клавише переключения экрана - Fl на 
[ВМ РС). | 


ftextscr) 


Переключает экран из графического режима B текстовый B CHCTE- 
мах с одним экраном (эквивалентна клавише переключения экрана - Е] 
на IBM РС). 


у 


[textpage) 


Аналогична функции ТЕХТЗСК за исключением того, что она 
очищаст тскстовый экран от любого отображаемого на нем текста. 
Функция появилась в 11-й версии Автокада. . 


[grclear} ° 3 | 3 


Очищает текущий видовой экран. Ha одноэкранных системах это 
первоначально приведет к переключению из текстового режима в гра- 
фический; при этом зоны команд и состояния меню останутся без из- 
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менения. Первоначальное состояние графического. экрана может быть 
восстановлено с помощью функции REDRAW без аргументов. 


[redraw [имя_примитива [режим] 


Действие данной функции зависит от количества аргументов. Если 
аргументов нет, то она’ перерисовывает текущий видовой экран, как это 
делает команда Автокада “REDRAW ('ОСВЕЖИ): если она вызывается с 
аргументом имя_примитива, то перерисован будет только этот выбран- 
ный примитив. Эту функцию часто. используют для идентификации 
примитива на экране после использования функции Автокада 
GRCLEAR (имена примитивов описаны в разделе “Доступ к примити- 
вам и средствам Автокала” настоящей главы). Полный контроль за ne- 
рерисовкой примитива обеспечивается заданием параметра paan KO- 
торый может принимать одно из Е значений: 


Режим REDRAW Действие 


l Перерисовывает примитив на экране 

2 Не рисует примитив (стирает) 

3 Полсвечиваст примитив (если позволяет дисплей) 
4 Перестает подсвечивать примитив (если позволяет 


дисплей) 


Если имя_примитива - заголовок сложного примитива (полилинии 
или блока с атрибутами), то в процессе перерисовки будут участвовать 
как основной примитив, так и все подпримитивы, при условии, что 
аргумент режим положителен. Если же аргумент режим отрицателен, то 
в процессе выполнения функции REDRAW будет участвовать только 
основной примитив. Функция REDRAW всегда возвращает nil. 


[grdraw от к цвет [подсветка] 


Данная функция рисует вектор между двумя точками на текущем 
виловом экране. Координаты точек от и к определяют конечные точки 
отрезка в текущей ПСК. Всктор подрезается до видимой части на экра- 
не. Цвет вектора заластся ипелочисленным аргументом цвет. Если это 
значение равно -|, то цвет дополняет цвет линии, поверх которой он 
отрисовывается, до цвета фона, что делает данный фрагмент невиди- 
мым. Если аргумент подсветка присутствует M не равен нулю, то вектор 
изображается подсвеченным, как выбранный примитив, если дисплей в. 
состоянии это отобразить. При отсутствии или при нулевом значении 
этого аргумента используется обычный режим отрисовки. 
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[grtext [бокс текст [подсветка]) 


Данная функция ‘обеспечивает доступ к текстовым частям гра- 
фического экрана Автокада. Если аргумент бокс присутствует и равен 
целому числу в пределах от нуля до наибольшего нумерованного бокса 
экранного меню минус единица, ‘высвечивается строковый аргумент 
текст в заданном боксе экранного меню. Если текст не помещается, он 
усскается. При слишком коротком тексте он дополняется пробелами. 

В присутствии подсветки не равной нулю текст подсвечивается. 
Снять подсветку можно установкой этого значения в нуль. Подсветка 
другого бокса автоматически снимает подсветку предыдущего. При 
вставке текста в бокс он сначала должен быть записан без подсветки, 
а потом его можно подсветить. Для того, чтобы подсветить бокс меню 
или снять с него подсветку, необходимо указать тот же строковый аргу- 
мент текст, который был первоначально записан в этот бокс, но с apry- 
ментом подсветка. Заметим, что эта функция только высвечивает ука- 
занную строку экранного меню; она не заменяет отмеченных пунктов 
меню. Более того, на некоторых типах мониторов действие обычной 
подсветки пункта меню заключается в. изменении цвета этого пункта, 
так что СКТЕХТ может возвратить текст пункта в предыдущее состоя- 
ние, если этот пункт меню подсветить. На некоторых мониторах зона 
меню переписывается при выполнении действий по переключению эк- 
рана или при Перерисовке экрана командами ОСВЕЖИ, РЕГЕН. Одна- 
ко на большинстве мониторов текст функции СКТЕХТ будет оставаться 
в зоне экранного меню до тех пор, пока его не перепишет новая стра- 
ница меню. 

Если в функции СКТЕХТ указать номер бокса равным -1, текст бу- 
дет записан в статусную строку режимов. Длина статусной строки раз- 
лична на разных мониторах, в большинстве случаев она составляет 
40 символов. При превышении этой длины текст усекается. 

Если номер бокса равен -2, текст записывается в строку координат. 
Если отслеживание координат включено, значения, записанные в этом 
поле; будут переписываться, как только от.устройства указания последу- 
ют новые данные о координатах. В двух последних случаях при задан- 
ном аргументе подсветка он игнорируется. 

Если функцию вызвать без аргументов, текстовые поля экрана при- 
дут к стандартному виду. 


[grread [отслеживание] 


Функция позволяет непосредственно считывать информацию с уст- 
ройств ввода Автокада, отслеживая перемещения устройства указания. 
Аргумент отслеживание, если он присутствует и не равен nil, дает воз- 
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можность возвратить координаты от устройств указания в то время, как 
они движутся, не требуя нажатия кнопки ввода. 

СККЕАО возвращает список, первый элемент которого - код, ука- 
зывающий тип устройства или режима ввода. 

Коды для первого элемента списка: 


Код Назначение 

а Символ клавиатуры - второй элемент - его АЗСП-код 

3 Выбранная точка - координаты в виде списка 

4. Выбранная ячейка экранного меню - номер бокса 

5 Задан режим отслеживание, не равный nil. Второй элемент - 


координаты режима отслеживания 

Выбран пункт меню ВОТТОМ$ - номер кнопки 
Выбран пункт меню TABLET! - номер бокса 
Выбран пункт меню TABLET? - номер бокса 
Выбран пункт меню ТАВЕЕТЗ - номер бокса 

10 Выбран пункт меню ТАВГЕЛ4 - номер бокса 

11 Выбран IMyHKT меню AUXI - номер бокса 


12 Координаты, связанные с кнопкой указателя в качестве второго. 
элемента. Всегда следует за типом 6, возвращает список 


хх © N ^^ 


Нажатие клавиши “CTRL С” при выполнении функции СККЕАБР 
приведет к прерыванию выполнения Лисп-программы., Любой другой 
ввод будет передаваться непосредственно к функции, предоставляя пол- 
ный контроль над устройством ввода. 

При нажатии кнопки выбора и указания области экранного или 
падающего меню СККЕАО возвращает код 11, но при последующем 
вызове код 12 не возвращается: код 12 возвращается только после кодов 
6 или 11, если кнопка выбора нажата npa указании на ТА иЧЬСКУЮ 
область экрана. 

Важно очищать буфер от данных кода 12 перед выполнением дру- 
гих действий с кнопкой выбора или меню AUX1. Для этого можно Bbl- 
полнить вложенную функцию GRREAD: 


(setq соде12 (grread (setq code (grread)))) 


Данная. последовательность запоминает значение кода 12 как пото- 
ковый ввод с устройства. 


мрог] 


Возвращает список дескрипторов действующих в настоящий мо- 
мент видовых экранов. Каждый дескриптор видового экрана - это спи- 
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сок, содержащий номер видового экрана и координаты его нижнего ле- 
вого и правого верхнего углов. Значения координат находятся в интер- 
вале от 0.0 до 1.0, где (0.0 0.0) - координаты нижнего левого угла зоны 
графического экрана, а (1.0 1.0) - координаты ее верхнего правого угла. 
Дескриптор текущего видового экрана всегда стоит в списке первым. 

Таким образом, из программы на Автолиспе можно гибко управ: 
лять режимами отображения графического редактора. Но на этом не 
исчерпывается список ориентированных на систему Автокад функций 
Автолиспа. В Автолиспе есть функции, позволяющие использовать 
внутренние возможности графического редактора. как системы управле- 
ния графической базой данных. К таким ‘функциям относятся функции 
‚ объектной привязки и определения различных геометрических парамет- 
ров объектбв, описываемые ниже. 


[menucmd строка] 


Данная программа представляет механизм листания меню в про- 
граммах на Лиспе, что позволяет согласованно работать с загруженными 
файлами меню, высвечивая соответствующие страницы. МЕМОСМО percer- 
да возвращает nil. Аргумент строка записывается в слелующей форме: 
раздел=субменю 


Раскросм. что иместся в виду под разделом и субменю. 


Раздел Имя субменю 

S SCREEN 

В] - B4 BUTTONS or 1 до 4 
I ICON 


Pl - P16 - (POP) от | до 16 
T1 -T4 TABLET от 1 до 4 
Al - A4 AUX от l 104. 

M Выражения DIESEL 


Субменю - Указывает. какое субменю активизировать. Именем 
должна быть либо одна из меток.-субменю без ** в текущем загружен- 
ном файле меню, либо имя одного из разделов меню. Знак $ здесь He 
используется. 

Что касается графических и падающих меню, то для них допустимо 
имя *, которое означает вызов субменю из текущего раздела. 


1.18. Геометрические функции 


В этом разделе собраны функции пересчета одних параметров, 
определяющих м. а примитивов из Автолиспа, 
в другие. 


[osnap точка режим) 


Возвращает точку, которая является результатом применения объ- 
ектной привязки, задаваемой в строке “режим” для указанной точки. 
Режим - строковая константа, состоящая из одного или более. иленти- 
фикатора объектной привязки, как, например, “середина”, “центр” 
и т. д., разделенных запятыми: | 


(setq pt2 (озпар pt1 “сер”)) 
(setq pt2 (osnap pt1 “cep, KOH, 4eH”)) 


Если аргумент точка - двумерная точка (список из двух действи- 
тельных чисел), то будет возвращена двумерная точка. Если точка - 
трехмерная точка (список из трех действительных чисел), то будет воз- 
вращена трехмерная точка. Если ни одной точки, соответствующей 
заданному режиму объектной привязки, не найлено, то будет возвращен 
nil. Отметим, что действие этой функции зависит также от текущего 
трехмерного вида и от значения системной переменной FLATLAND. 


[polar точка угол расстояние) 


Возвращает точку в ПСК, находящуюся под заданным углом и рас- 
стоянием от заданной точки; угол измеряется в радианах в направлении 
против часовой стрелки от оси Х. Хотя точки могут быть ‘и трехмерны- 
ми, угол всегда определяется в текущей плоскости построений. Если 
значение системной переменной FLATLAND равно нулю, то возвраща- 
ются трехмерные точки, в противном случае - двумерные. 


[distance точка] точка?) 


Эта функция возвращает расстояние между двумя трехмерными 
точками. Если значение системной переменной FLATLAND не ‘равно 
нулю, то функция DISTANCE предполагает двумерные точки (игнори- 
рует координату 7 переданной точки) и возвращает расстояние между 
точками - проекциями указанных трехмерных точек на Мю плос- 
КОСТЬ построений. 
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[angle точка] точка?) 


Возвращает угол в радианах, образованный лучом, направленным 
из точки| в точку2 и осью X текущей плоскости построений. Угол из- 
меряется против часовой стрелки. Трехмерные точки проецируются 
на тскушую плоскость построений. 


[inters точка] точка2 точка3 точка4 [неопред] 


Возвращает точку пересечения двух отрезков (точка| точка?) 
и (точка3 точка4). Все точки выражены в координатах текущей ПСК. 
Если значение системной переменной FLATLAND равно нулю, 
то точки считаются трехмерными и контролируется пересечение в трех: 
мерном пространстве. В противном случае отрезки проецируются на Te- 
кушую плоскость построений и пересечение контролируется на плоско- 
сти. Если факультативный аргумент неопред присутствует и является 
nil, то контролируется пересечение не отрезков, а определяемых ими 
прямых и INTERS будет возвращать точку пересечения даже в том 
случае, если она не приналлежит ни одному из отрезков. Если же фа- 
культативный аргумент неопред отсутствует или не является nil, то 
точка пересечения должна принадлежать обоим отрезкам (отрезки 
должны пересекаться). иначе будет возвращен nil. В Автокаде 11 nepe- 
сечение контролируется в трехмерном пространстве, если все четыре 
точки имеют три координаты. 


[trans точка n3 в [вектор] 


Эта функция преобразует координаты точки (или величину переме- 
щения) из одной системы координат в другую. Аргумент точка - список 
из трех действительных чисел, который можно интерпретировать либо 
как трехмерную точку, либо как трехмерное перемещение (вектор); из - 
код системы координат, в которой находится указанная точка, а в - код 
системы координат, в которой происходит преобразование координат 
точки. Если иместся факультативный аргумент вектор и его значение 
не равно нулю. то аргумент точка будет трактоваться как трехмерное 
раны 


1.19. Работа с файлами: ввод/вывод 


Работая с Автолиспом, у вас рано или позлно возникнет желание 
записать ту или иную информацию в файл или принять ее оттуда. Сред- 
ства работы с файлами в Автолиспе не слишком развиты, однако для 
большинства повседневных нужд этого вполне достаточно. | 
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[open имя_файла режим) 


Эта функция открывает файл. Возвращается дескриптор файла. 

Функции ввода/вывода работают не с именами файлов, а с так на- 
зываемыми дескрипторами файлов, определяющими не только собст- 
венно файл, но и режим доступа и различные другие системные пара- 
метры. “Открыть файл” - значит подготовить дескриптор файла к nc- 
пользованию его функциями ввода/вывода Автолиспа. Поэтому возвра- 
щаемое функцией ОРЕМ значение дескриптора файла должно присваи- 
ваться некоторой символьной переменной, например: 


(setq а (open “file.ext” “г”)) 


Здесь переменная а - дескриптор файла file.ext, открытого для чтения. 
Флаг чтения или записи - это, как и имя файла, строковая константа, 
состоящая из одной буквы, которая должна ‘быть набрана на нижнем 
регистре. Допустимые значения флага чтения/записи приводятся ниже: 


Режим ОРЕМ. Описание 


-x 


Открыть файл для чтения. Если файл с указанным 
именем не существует, возвращается, nil 


wW - Открыть файл для записи. Если файл с указанным 
именем не существует, создается и открывается новый 
файл. Если такой файл уже существует, то хранящиеся 
в нем данные будут утеряны 


Имя файла может включать в себя путь (имена налкаталогов). 
В системах MS-DOS/PC-DOS допускается также использовать букву 
устройства ввода/вывола; и вы можете пользоваться’ обратной косой 
чертой вместо прямой косой черты. (Напомним: чтобы ввести в строку 
одну обратную косую черту. слелуест напечатать две обратных косых 
черты: “\\”). 


[close дескриптор. файло] 


Эта функция завершает! все процессы, инициированные функцией 
ОРЕМ. После закрытия файла использование дескриптор_файла невоз- 
можно, хотя сам дескриптор файла не изменяется. Использование 
функции close обязательно: все открытые файлы должны быть закрыты, 
иначе данные могут быть потеряны. 


па е имя. файла) 


Эта функция отыскивает файл имя_ файла (т. е. возвращает полное 
имя файла по указанному основному имени файла) в каталогах, храня- 
щих ‘файлы Автокада. Сначала просматривается текущий катазог, затем 
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каталог, в котором хранится текущий рисунок; и, наконец, каталог, имя 
которого записано в переменной среды ACAD., Такое полное имя MOX- 
но передавать функции ореп. 


| fread строка] . 


Эта функция возвращает первый список или атом из данной стро- 
ки, причем строка не. должна содержать пробелов, за исключением, на- 
ходящихся в списке. READ возвращает аргументы, задавая им соответ-. 
ствующий тип данных. 


[read-char [дескриптор_фойла]) 


X 


Считывает единичный символ из буфера клавиатуры или из откры- 
того файла, заданного аргументом дескрипторфайла. Возвращается це- 
лое число - код АЗСИ считанного символа. Если дескрипторфайла не 
задан и буфер клавиатуры пуст, функция ожидает ввода символа (поль- 
зователь должен ввести что-либо с клавиатуры, заканчивающееся 
RETURN). Например, если в ответ на ‘запрос функции read-char поль- 
зователь введет с клавиатуры “АВС” и завершит ввод нажатием клавиши 
RETURN, то функция read-char возвратит код 65 (код ASCII латинской 
буквы “А”). При следующих трех обращениях к геад-сваг она возвратит 
соответственно 66, 67 и 10 (код перевода строки). Если последует пятый 
вызов функции геаа-спаг,. она снова будет ожидать ввода. Для унифика- 
ции работы программ на Автолиспе в различных операционных систе- 
мах функция геа4-сПпаг возвращает при. чтении конца строки один CHM- 
ВОЛ C КОДОМ 10. 


[read-line [дескриптор_файла]] 


Данная функция считывает строку символов с клавиатуры или из 
открытого файла, заданного аргументом дескриптор_файла. Возвраща- 
ется считываемая строка. Если. достигнут конец файла, возвращается nil. 


[write-char число [дескриптор_файла] 


Эта функция записывает один символ. на экран или в. открытый 
файл, заданный аргументом дескриптор_файла. Здесь число - код ASCII 
символа и является возвращаемым функцией значением. Функция 
write-char не может записать в файл символ NUL (ASCII - код 0). 
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[write-line строка [дескриптор_файла] 


Эта функция записывает строковую константу строка на экран или 
в открытый файл, заданный аргументом дескриптор_файла. Она возвра- 
щает строку, взятую в кавычки, и опускает кавычки при записи в файл. 


[orin] [вырожение[дескриптор_файла]]] 


Данная функция выводит выражение на экран или в открытый 
файл, заданный аргументом: дескриптор_файла, без пробелов и перехо- 
дов на новую строку и возвращает выражение. Выражение может быть 
любым, а не только строковой константой. Если выражение - строковая 
константа, включающая управляющие символы, то они интерпретиру- 
ются следующим образом: 


Символ Значение 


\\\ символ \ 


y символ“ 

\е символ ебсаре-последовательности 
\n перехол на новую строку 

\г возврат каретки 

M табуляция 

\nnn символ с восьмеричным кодом nnn 


При использовании PRIN1I без аргументов в качестве последнего 
выражения определяемой пользователем функции. то после завершения 
работы функции все, что появится на экране, - это пустая строка. 


[orinc [выражение [дескриптор_файла]]] 


Данная функция в отличие от предыдущей предназначена для печа- 
° Ти управляющих символов в выражении без расширения, т. €. так, как 
они могли считываться функциями типа READ-LINE. 


[orint [выражение [дескриптор_файла]] 


Данная функция в отличие от предыдущей предназначена для печа- 
ти выражения с новой строки с последующим пробелом. 


[егри) 


Данная функция печатает новую строку на экране и возвращает nil. 
Она не используется для ввода/вывода файлов. 
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[prompt сообщение] 


Данная функция высвечивает сообщение в зоне подсказок экрана 
и возвращает nil. Сообщение`- это строка символов. 


| 
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1.20. Работа со списками 


Как говорилось в п. 1.4.2, список - это группа элементов любого до- 
пустимого в Автолиспе типа. Список Автолиспа может содержать любое 
количество действительных и целых чисел, строк, переменных или Apy- 
гих списков. Все, что находится между открывающей и закрывающей 
круглыми скобками, - список. Списки удобно использовать для органи- 
зации и обработки больших массивов связанных данных. Автолисп име- 
ет развитые средства работы со списками. Они вкратце описаны ниже. 


(list выражение] выражение?) 


Эта функция просто составляет список H3 своих аргументов. 
Например, выражение (list 5.5 8.0) возвращает список, содержащий два 
действительных числа: (5.58.0); этот способ часто используется в Автолис- 
пе для создания новых. точек из известных координат. Подчеркнем, что 
_ при составлении списка функция list оценивает выражения-элементы. 


[quote выражение] или ‘выражение 


Функция quote (буквально - “цитировать”) подавляет оценку своего 
выражения. Это бывает нужно при формировании списка. Например. 
выражение (list ‘а ‘Ъ `с) формирует список (а b с). | 

Поскольку список представляет собой группу элементов, может 
возникнуть необходимость извлечения одного элемента из списка. 
Существует две простейшие функции извлечения элементов списка: 


(саг список] 

Возвращает первый элемент списка. Если список пуст, возвращает- 
ся nil; 

[cdr список] 


Возвращает все элементы списка, кроме первого. Если список пуст, 
‚ возвращается nil. Если элементом списка является точечная пара, функ- 
ция возвращает последний элемент, не заключая его в список. 
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Из этих простейших функций, как из кирпичиков, составлены CHE- 
пления функций извлечения элементов списка вплоть до четырех уров- 
ней вложенности: | 


(сааг x) эквивалентно (car (саг х)) 
(саг x) эквивалентно (cdr (car x)) 
(cadar x) эквивалентно (car (cdr (car x))) 
(cadr x) эквивалентно (car (cdr x) 


(cddr x) эквивалентно (cdr (cdr x)) 
(caddr x) эквивалентно (car (cdr (cdr x))) 


В Автолиспе CADR часто используется для “извлечения” KOOpAH- 
наты У двумерной или трехмерной точки, а CADDR - ‘для извлечения 
координаты Z. Для этой же цели можно воспользоваться функцией nth: 


(nth номер список] 


Извлекает элемент списка с нужным номером. 

Однако будьте осторожны при работе с этой функцией: первый 
элемент списка имеет номер 0, а не 1 (функция nth считает не 1, 2, 3.,..., 
а 0, 1, 2. 3, ...). Так считает машина, однако вам-то от этого не легче - 
учтите, что в счете элементов списков у функций Автолиспа нет.едино- 
образия, поэтому нужно быть внимательным. Кроме того, к средствам 
поддержки списков относятся функции: 


[last список] 


Возвращает последний элемент списка, причем список не должен 
быть равен nil. НЕ РЕКОМЕНДУЕТСЯ использовать эту функцию для 
извлечения Y- или Й-координаты точки, поскольку это требует допол- 
нительных усилий по поддержке правильной размерности точек; 


[reverse список] 


Возвращает список с элементами, переставленными в обратном Mo- 
рялке; 


[length список] 


Возвращает целое число, равное числу элементов в списке, 


[append выражение] вырожение2 ...] 


Берет любое число выражений (списков) и сливает их в один список; 
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[cons выражение список}; 


Эта функция, наряду с функцией list, используется для создания 
списков, Она добавляет в начало списка новый элемент, которым может 
быть также и выражение. 

Кроме этих. простейших функций существуют функции assoc 
и subst, позволяющие работать со структурированными списками, MO- 
добно структурам в других языках программирования. Работа со струк- 
турированными списками будет рассматриваться ниже, при разборе 
работы с графической базой данных Автокада (п. 7.22). 


1.21. Создание функции в Автолиспе 


Вы можете определять в Автолиспе свои собственные функции. 
Функния DEFUN определяет функцию посредством создания структу- 
рированного списка операторов программы. Определенная вами функ- 
ция создает свою собственную замкнутую область локальных перемен- 
ных. При вызове функции в эту замкнутую область передаются данныс. ` 
выполняются операторы вашей программы, после чего осуществляется 
передача данных обратно в среду Автолисп - Автокад. 

Формат функции DEFUN следующий: 


(defun имя (аргументы / локальные параметры) 
тело функции 


) 


Правила именования функций те же, что и правила именования пе- 
ременных. Помнитс, что если’ вы переопрелелили встроенную функцию 
Автолиспа, то она останется для недоступной до тех пор, пока вы не Ha- 
чнете новый рисунок. Строки программы составляют ядро функиии. 
Порялок оценки ‘их вычислителем Автолиспа уже обсужлался. Послед- 
нее возвращасмое значение передается в среду Автокад - Автолисп. 

При запуске графического редактора Автокад загружает файл 
асаа.15р (если он существуст) автоматически. В этот файл можно внести 
определения наиболее часто используемых функций, и они будут загру- 
жаться автоматически при вызове графического редактора. При этом на 
экране появится сообщение 


Loading acad.lsp...loaded. 
Загружаю асад.1$р...загружен. 


При определении функции при помощи DEFUN можно указать. 
что она должна выполняться автоматически сразу же после загрузки. 
Для этого ее нужно назвать 5::5 ТАКТОР. Если вы поместите определен- 
ную таким образом функцию в файл аса4.15р, то она будет автоматичес- 
ки загружаться и выполняться сразу же после вызова Автокада. 
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Определенные вами функции могут быть использованы так. же, как 
и команды Автокада. Это позволяет сделать программу модульной, мно- 
гократно использующей какие-то подпрограммы. 

Для того, чтобы пользоваться вновь созданными командами Авто- 
када, функции, ‘определенные с помощью DEFUN, должны удовлетво- 
рять следующим условиям: | 
°® Имя функции должно быть вида С:ХХХ. Причем, если вы работае- 

те в русском Автокале, все буквы лолжны быть прописными. Буква 

“С” набирается в латинском регистре. Часть имени “С:” должна 

присутствовать всегда, а часть имени “ХХХ” может быть любой, но 

не должна дублировать какую-либо команду Автокада, внешнюю 
или встроенную функцию. _ 

e Функция должна быть определена без аргументов. Допускаются 
только локальные символы. 


' 


1.22. Установка текстового редактора 


Межлу тем программу Автолиспа можно записывать в файл, что 
позволяет не набирать ее каждый раз заново, a- загружать из файла 
(и конечно, редактировать). Файлы программ на Автолиспе имеют рас- 
ширение .15р. Программа может содержать любое количество определе- 
ний функций и других. выражений. 

Файлы программ на Автолиспе Являются обычными текстовыми 
файлами, и вам не нало беспокоиться о разбиении файла на страницы 
или считать пробелы. Пустые строки не рассматриваются интерпретато- 
ром Автолиспа как нажатия клавиши “ENTER”, а просто игнорируют- 
ся, как и лишние пробелы. Вы набираете программу-функцию в любом 
текстовом редакторе, не вставляющем в файл своих служебных симво- 
лов (это может быть, например, строковый редактор EDLIN; входящий 
в комплект DOS, экранные редакторы Norton Editor, MultiEditor или xa- 
же Лексикон). Не рекомендуется для создания программы на Автолиспе 
использовать текстовые процессоры, ` такие, как Microsoft Word или 
CharWriter, поскольку они применяют свой формат файлов, вставляя в 
них свою служебную информанию, которая не может быть обработана 
компилятором Автолиспа (конечно, они позволяют выводить набран- 
ный документ в так называемом режиме ASCII без форматирования, HO 
их назначение не набор программ, а создание документов). | 

‚В стандартной поставке Автокала в подменю  ЧУТШПУ/ 
ExternalCommands имеется пункт EDIT:, выбор которого приводит к aB- 
томатическому вызову строкового редактора EDLIN. При выборе BPH 
на экране высвечивается подсказка: 


File to еди:<Введите имя файла> 
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Редактировать файл:<Введите имя файла> 


После того как вы введете имя файла, Автокад вызывает текстовый - 
редактор. Если вы не настраивали ваш Автокад, то этот редактор. - стро- 
ковый редактор EDLIN. Если вы:-сталкивались с ним раньше, то знаете, 
что это, не самый удобный редактор. Мы советуем подключить к Авто- 
каду редактор Norton Editor. Его преимущество в том, что он невелик, 
т. е. требует мало памяти, и в то же время это достаточно мощный для 
нас экранный редактор, отслеживающий пары скобок и кавычек. 

Все внешние команды Автокада определены в файле acad.pgp: 


CATALOG,DIR /W,30000, *Ейез: ‚0 

DEL, DEL, 30000, Fite to delete: ‚0 j 
DIR,DIR,30000, File specification: ,0 i 
EDIT, EDUN, 42000,File to edit: ‚0 
SH,,30000,*DOS Command: ,0 

SHELL, ,127000,*DOS Command: ,0 

ТУРЕ, TYPE,30000, File to list: ‚0 

КАТАЛОГ, О1В /W,27000,*Noka3aTe файлы: ‚0 
DEL, DEL, 27000,Удалить файл: ‚0 

ОВ, ОГВ, 27000,Показать файлы: ‚0 
РЕДАКТ,ед!т,30000,Редактировать файл: ‚0 
ДОС1,,27000,^Команда ДОС: ‚0 | 
ДОС,,127000, *Команда. ДОС: ‚0 

ТУРЕ, ТУРЕ, 27000,Файл для просмотра: ‚0 

Кажлая строка в этом файле соответствует одной команде‘ подменю 
Extemal Commands (Внешние команды). Это подменю называется так 
именно потому, что его команды; берутся из файла аса4.рер, а не запи- 
саны в самом Автокаде. Можно модифицировать команды этого подме- 
ню. Рассмотрим одну строку (команду) этого файла, EDIT. 

Первым элементом строки, выделенным запятой, является команда. 
высвечивасмая в Автокаде в подменю External commands. Вторым ae- 
ментом является команда DOS, которая будет выполнена при выборе из 
меню команды. Третьим элементом командной строки является объем 
памяти, который освобождает Автокад перед вызовом редактора. Чет- 
вертым элементом строки является подсказка, которая высвечивается 
‘после выбора команлы и требует ввести имя файла, который вы хотите 
редактировать. И наконец, пятым. элементом строки является целое чис- 
ло, определяющее, какой экран (графический или текстовый) будет Bbl- 
зван при возврате в Автокад (0 - текстовый экран, 4 - графический). 
Для того чтобы вместо редактора EDLIN вызывался редактор Norton 
Editor, нужно заменить строку EDIT на следующую: 


EDIT,ne,60000, File to edit: ‚0 
РЕДАКТ,пе,60000,Редактировать файл: ‚0 
Теперь файл с программой на Автолиспе редактировать удобнее. 
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1.23. Написание программ на Автолиспе 


Вы уже знаете, что в Автолиспе углы измеряются B радианах и MO- 
гут принимать значения от 0 до 2*PI радиан. Поскольку болёе удобно 
измерять углы в градусах, введем новую функцию, преобразующую гра- 
дусы в радианы. Итак, войдите в редактор, указав ему имя myprog.lsp, и 
наберите текст следующей программы; 


‚Преобразование углов из градусов в радианы 
(defun dtr (а) 
(* pi (/ a 180.0)) 
) 
(prompt “\пПрограмма загружена - синтаксических ошибок HeT! ) 
‚Конец программы 


Заметим, что строка в тексте программы, начинающаяся с точки 
с запятой. - это строка комментариев, которая Автолиспом не обраба- 
тывается. Если точка с запятой стоит не в начале строки, то все, что по- 
сле Hee,- тоже комментарии. Расположение скобок не играет никакой 
роли при: интерпретации ‘программы вычислителем Автолиспа, но про- 
грамма лучше ‘читается, ссли закрывающие скобки располагаются либо 
на той же строке, либо в том же столбце. что и открывающие. 

Сохраните файл с’ программой на диске и загрузите его в Автокад: 


Команда: (1юад “гургод”) 
Автолисп возвращает: nil 


Здесь load - функция Автолиспа, выполняемая с командной строки 
Автокала. Функиия вызывает программу из файла в среду Автокал - 
Автолисп. Указывая ей имя файла, не надо писать расширение: ‘она 
берет файлы с расширением „Бр по умолчанию. (Не путайте функцию 
load Автолиспа с команлой LOAD Автокала, загружающей файлы форм, 
- это предупрежление ‘относится особенно’ к тем, кто ‘работает на:анг- 
лийской версии Автокада.) При загрузке функции Автолисп читаст 
из файла определение функции, осуществляет синтаксическую проверку 
и, если ошибок (синтаксических!) нет, сохраняет функцию в области 
памяти, специально отведенной для пользовательских программ, после 
чего отображает на экране имя загруженной функции. Все, что не явля- 
ется определением функции (в нашем случае это подсказка “рготрг”), 
выполняется Автолиспом немедленно: ‘Определенная пользователем 
функция должна быть вызвана явно. 

Теперь можно проверить работу этой функции, ‘вводя разные 
значения аргументов: 


Команда: (dtr 180) 
Автолисп возвращает: 3.141593 


Аргументы функции - это имена переменных, которые ‚использу- 
ются для передачи данных в локальную среду функции. Аргументы 
функции называются также формальными параметрами (в отличие 
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от фактических параметров, т. €. тех параметров, которые указываются 
при вызове функции). В примере а - формальный параметр, число. 180 - 
‘фактический. Список` фактических параметров должен соответствовать 
списку формальных параметров, т. €. ‘они должны иметь одинаковое 
число элементов, без пропусков и перестановок. 


1.24. Доступ к примитивам и средствам Автокада 


Чуть ли не самой главной особенностью Автолиспа является то, что 
он позволяет осуществлять доступ к графической базе данных (ГБД) 
Автокада, многократно умножая возможности адаптации последнего 
к какому-либо типу задач. Попытаемся вкратце показать, как можно HMC- 
пользовать возможности Автолиспа для работы непосредственно с объ- 
ектами чертежа. | 

Любой создаваемый в Автокаде чертеж состоит из отдельных при- 
‚митивов, геометрическое описание которых хранится в специальном 
‚ формате (формате Автокада) в файле. чертежа (расширение .dwg). При 
` загрузке, чертежа, Автокад заполняет графическую. базу. данных - заносит 
в нее системные настройки, создает список объектов и вносит в ГБД 
геометрическое описание. этих объектов, присваивая' при этом каждому 
примитиву ‘уникальное имя. Итак, в сеансе редактирования каждый 
примитив Автокада (отрезок, дуга, окружность и т. п.) имеет свое имя, 
по которому его распознает сам Автокад. Поскольку имена меняются от 
одного сеанса редактирования к другому, не имеет смысла их хранить - 
даже не пытайтесь запомнить их. Вместо этого следует в программе на 
Автолиспе сначала найти имя примитива в базе данных Автокада с тем, 
чтобы впоследствии непосредственно. манипулировать геометрическими. 
характеристиками. примитива: или использовать их.в макроопределениях 
меню. Попробуем извлечь это имя из [BA при Помощи -Автолиспа. 
Нарисуйте отрезок и введите с командной строки Автокала строку | 


Сотглапа: (setq епатеё (entlast)) 
Автокад возвращает: <Еп{Ку name: 60000018> 


Команда: (setq епате (еп{а${)) 
‚ Автокад возвращает:<Имя примитива: 60000018> 


Тем самым мы присвоили переменной епате имя последнего при- 
митива (в данном случае отрезка). Напомним еще раз, ‘что имена 
примитивов меняются от сеанса к сеансу, и вы наверняка’ увидите на 
экране другое имя. Имена примитивов в Автокаде`- шестнадцатеричные 
величины; имя примитива может быть, например, таким: 60000А14. 
Используя это имя, вы можете при помощи функции ЕМТСЕТ no- 
лучить Яоступ к данным, связанным с примитивом: ` 


(setą edata (entget епате)). | 
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Имя примитива - это новый для нас тип данных Автолиспа, и если 
функции Автолиспа. ЕМТОСЕТ требуется имя примитива, то бесполезно 
‚ указывать число 60000018 - надо передать переменную епате, в которой 
это имя хранится. 

В результате выполнения команды вы получите малопонятное со- 
общение: | 


((-1. <Имя примитива: 60000020>) (0. “ШМЕ”) (8. “0”) 
(10 1.0 2.0 0.0) (116.0 6.0 0.0)) 


Дело в том, что с точки зрения Автолиспа все данные, описываю- 
щие примитив, представляют собой список, состоящий, B свою очередь, 
из подсписков, в которых сгруппированы по функциональному Ha- 
значению все данные о примитиве, как геометрические, так и общие: 
слой, цвет и т. п. Подсписки отличаются друг от друга по специальным 
колам формата DXF (Drawing eXchange Format - формат обмена рисун- 
ками). которые позволяют определить, какой тип данных хранится 
в подсписке. Каждый подсписок имсет две части. Первая - код DXF, 
вторая - ланные. Целое число 0, например, представляет собой код типа 
примитива. Код $ говорит о том, что следующее за ним число - номер 
слоя. Код 19 - начальная точка примитива, код ll - конечная, M.T. п. 
Отметим, что набор кодов DXF различен для примитивов разных типов. 
Однако сами коды относятся ко. всем примитивам - имя примитива, на- 
пример, всегда хранится в подсписке с кодом ОХЕ -1. 

Представим полученный список edata в более понятном виде: 


( (-1. <Имя примитива: 60000020>) 
(0. “ЫМЕ”) ; Тип примитива 
(8. “0”) ‚ Слой 
(101.0 2.0 0.0), ‚ Начальная точка 
(116.0 6.0 0.0) _ ; Конечная точка 


Как нетрудно догадаться, пользуясь кодами DXF, можно извлечь из 
списка edata любую информацию о примитиве. Такой доступ к рисунку 
более сложен, но предоставляет невиданные ранее возможности. Теперь 
вы сможете изменять практически все свойства примитивов. 

В Автокаде имеется стандартное средство работы не с одним, 
ас несколькими примитивами. Это средство называется набором. 
Практически все команды редактирования работают не с отдельными 
‘примитивами, а с группой примитивов. Из Автолиспа также можно pa- 
ботать с наборами примитивов - предоставлять пользователю возмож- 
ность заносить примитивы в набор и затем модифицировать ‘занесенные 
туда примитивы. Набор формируется функцией SSGET: 


(ssget [режим] [точка1] [точка2]) 


Необязательный аргумент режим - это строка, которая указывает 
способ выбора примитива. Им может быть “P”, “С”, “I? и “T” - соот- 
ветствующие Рамке, Секущей рамке, Последнему и Текущему набору 


` 
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. примитивов Автокала. Для 12-й версии добавляются “PMH”, “CMH”, 
“Л”, соответствующие Многоугольнику, Секущему многоугольнику и 
Линии. Аргументы точка] и точка2 - списки точек, указывающие точки, 
относящиеся к выбору. 


Примеры функции 55СЕТ: 


(ssget) ‚: Выбирает по одному объекты чертежа . 

(ssget “Т”) ‚ Выбирает текущий набор 

(ssget “П”) ; Выбирает последний примитив 

(559% ‘(2 2)) ‚ Выбирает.примитив, проходящий через точку (2, 2) 
(ssget “P” ‘(0 0) ‘(5 5)) ‚ Выбирает примитивы в рамке от (0,0) до (5,5) 
(559е “С” ‘(0 0) ‘(4 5)) ‚ Выбирает примитивы, пересекаемые 


‚ рамкой от (0,0) до (4,5) 
(ssget “X” список-фильтр) ; Выбирает примитивы 
‚ в соответствии со списком-фильтром 


Выбранные объекты подсвечиваются только Тогда, когда 55 СЕТ 
используется без аргументов. 

Особый режим - режим SSGET “X”? - фильтры выбора. В этом 
режиме функция SSGET просматривает весь рисунок и создает набор, 
состоящий из имен всех основных примитивов, и 
заданным критериям. 

Доступные колы для SSGET sye представлены B НЕЙ таблице: 


Код Значение 

0 Тип примитива 

2 Имя блока для описания блока (INSERT) 

6 Имя типа линии | 

7 Имя гарнитуры шрифта для определений текста или атрибутов 
$ Имя слоя | 

3$ Уровень (вещественное число) 

39 Высота (вещественное число) 

62 Код цвета (0=”ПОБЛОКУ”, 256= “ПОСЛОЮ”) 

66 Следующий за атрибутом флаг в описании блока (INSERT) 
210 Вектор направления выдавливания (список из трех 


вещественных чисел) 


Для первых пяти кодов в Автокаде 11 и 12 разрешается использо- 
вать глобальные символы. | 

Например, используя этот режим, можно. создать набор, состоящий 
из всех отрезков, находящихся на слое “ЭТАЖ” зеленого цвета: 


(ssget “x” ‘((0. “ЫМЕ”)(8. “ЭТАЖ”)(62 . 3))) 
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В Автолиспе имеются хорошие средства работы с наборами прими- 
тивов. Рассмотрим их вкратце. 


Примитив Действие 


(sslength набор) _ Возвращает число примитивов в наборе. Если 
это число больше 32 767, то оно возвращается 
как действительное 


($зпате набор номер) Возврашает имя примитива под номером 
из набора. Запомните, что первый примитив 
в наборе имеет номер 0! Если примитивов. 
слишком много, используйте действительные 
числа (округляются до целых) 


(ssadd имя_примитива Если вызвать функцию без аргументов, ssadd 

набор) создаст новый набор без единого примитива. 
Если вызвать только с аргументом имя_прими- 
тива, будет создан набор, содержащий один 
примитив. Если вызвать с обоими указанными 
аргументами, примитив имя_примитива будет 
добавлен в набор 


(ssdel имя_примитива Удаляет имя_примитива из набора и возвращает 


набор) новый набор 

(ssmemb _ Если примитив имя_примитива находится: . 
имя_примитива B наборе, то возвращается имя примитива, если 
набор) нет - nil | 


Рассмотрим далее функции. позволяющие извлекать имена прими- 
тивов из ГБД по их порядку. 


Функция _ _ Назначение 


(entnext | Будучи вызвана без параметров, возвращает имя 
[имя_примитива]) первого неудаленного примитива в ГБД. Если задан 
i аргумент имя_примитива, будет возвращено имя 
первого неудаленного примитива, следующего 
в ГБД за примитивом имя_примитива. Если прими- 
тива нет, будет возвращен nil. Возвращаются как 
основные примитивы, так и субпримитивы 
(например, вершины полилинии, полученные 
в результате аппроксимации последней сплайном) 


(entlast) Возвращается имя последнего основного 
неудаленного примитива в ГБД 


Из Автолиспа можно непосредственно модифицировать данные 
о существующих в ГБД примитивах. Однако если мы хотим добавить 
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новый примитив, то должны использовать команды отрисовки или ре- 
дактирования Автокада. Это ограничение связано с желанием защитить 
ГБД от неграмотного программиста: неправильно пользуясь командами 
Автокада, вы не сможете испортить саму ГБД - самое большее, ЧТО ВЫ 
испортите, это свой чертеж. 

Примитивы можно удалять из чертежа командой 


(entde! епате) 

Автолисп возвращает имя примитива, например: 
<ЕпКупате:60000018> 
<Имя примитива: 60000018> 


Интересно, что если вы повторите эту операцию, то примитив бу- 
дет восстановлен. Этот способ позволяет удалять из [BA невидимые 
примитивы, что невозможно обычным выбором объектов (нельзя Bbl- 
брать невидимый объект). 

Для того чтобы модифицировать геометрические характеристики 
примитива непосредственно в ГЬД , надо уметь находить в ОХЕ-спискс 
данных примитива (наша переменная edata) подсписки, в которых хра- 
нится нужная информация. Выбор и изменение различных данных, от- 
носящихся к примитиву, осуществляется по коду DXF (это всегда целое 
число) с помошью функций assoc и subst: 


[assoc элемент_списка список] 


Извлекает из списка элемент списка по ключу элемент списка. 
Если элемент списка не найден, assoc возвращает nil. | | 

При ‘помощи этой функции можно извлечь, например, из списка 
goods ((| “саг” “volvo”)(2 “рисе” 80000)) подсписок (2 “рисе” $0000): 


(assoc 2 goods) возвращает список (2 “price” 80000) 


[subst новый_элемент старый_элемент список] 


Возврашает копию исходного списка` с заменой всех найденных 
подсписков, идентичных старому элементу, на новый_элемент. Если 
вхождений не обнаружено, subst возврашает копию старого списка 
(не nil’): 


(subst '(2 “price” 100000) ‘(2 “price” 80000) goods) 
возвращает: | 
((1 “саг” “уомо”)(2 “price” 100000)) 


Используя эту технику, попробуем извлечь из списка едайа имя 
примитива: 
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Команда:(а:5ос 0 еда\а) 
Автолисп возвращает:(0. “ЫМЕ”) 


В приведенном только что примере мы фактически сказали а 
лиспу: “Возврати мне подсписок с ОХЕ-кодом 0”. Автолисп просмотрел 
ОХРЕ-список примитива, нашел подсписок с кодом 0 и возвратил его. 
Разумеется, целиком. Полученный по коду подсписок все еще содержит 
ОХЕ-код, который необходимо убрать: первый элемент списка, ' уже 
“отработал” свое и больше не понадобится. Для этой цели лучше всего 
использовать функцию CDR: 


j 


Команда: (саг (assoc 0 edata)) 
Автолисп возвращает:" LINE” 


Извлекая из ОХЕ-списков нужную информацию, можно програм- 
мно обрабатывать ее H затем, внеся изменения в ОХЕ-список примити-. 
ва при помощи функции subst, модифицировать’ TBA при помощи 
функций епипод и епшра. | 


[entmod список} 


С помошью данной функции и список в формат, воз- 
вращаемый функцией ЕМТОЕТ, и обновляется информация базы дан- 
ных о примитиве, имя которого указано в группе -l списка. С помощью 
‚ функции ЕМТМОО нельзя изменить тип примитива. Все объекты, на 
которые ссылается список примитива (гарнитура шрифта, тип линии, 
имена форм‘и блоков), должны быть известны Автокаду к моменту се 
вызова. Исключением является имя слоя: если неизвестный Автокаду 
слой поименован в списке, ЕМТМОР создает новый слой со стандарт- 
ными значениями. | | 


[entupd имя_примитива] 


Функция регенерации отдельного примитива, не обязательно oc- 
HOBHOTO. i 
Приведем пример того, ‘как можно из Автолиспа т 
вершину полилинии: 


(setq e1 (entnext)) ‚ Переменной e1 присваивается имя полилинии 


(setq e2 (entnext е1))  ; Переменной e2 присваивается имя | 
‚ первой вершины 
(setq ed (entget е2)) ‚ В списке ed данные о вершине 1 
(setq ed ‚ Модификация переменной ed 
(subst(10 1.0 3.7) ‚ Этот список помещается на. место ‘старого 
(assoc 10 ed) ‚ вхождения списка с первым элементом 10 
) 
) 
(entmod ed) ‚ Обновляет данные B ГБД 
(entupd e1) ‚ Обновляет полилинию на экране 
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Заметим, что если вы попытаетесь извлечь данные о вставке блока 
(INSERT), то получите информацию о самой. вставке, а не.об определе- 
нии блока. | 
Итак, для модификации примитива (группы примитивов) непосред- 
ственно в базе данных нужно; а 
e предложить пользователю выбрать примитив (функция entsel) или 
группу примитивов (функция. $5#е1). Используя функцию $5861, 
можно выбирать примитивы из [B программно, без обращения 
к пользователю - по их свойствам (тип примитива, слой ит. п.); 

èe извлечь’ из ГБД данные, относящиеся к этому примитиву (если HC- ` 
пользовался набор, то сначала следует извлечь имя примитива из 
набора - функция $5 паше, затем извлечь из ГБД данные, относя- 
щисся к этому примитиву, - функция entget); 

® средствами работы со списками Автолиспа модифицировать данные 
о примитиве в переменной - списке данных (функции assoc, subst); 

è. модифицировать саму ГБД: внести изменения в чертеж (функции 
entmod и entupd). 


Информацию о,слоях, типах линий, вилах, гарнитурах шрифтов, 
блоках, ПСК, размерных стилях и видовых экранах Автокад хранит 
в справочных таблицах. Для работы с ними в Автокаде предусмотрены 
функции ТВЕМЕХТ и ТВЕЗЕАВСН, которые просматривают таблипу 
и выдают содержащуюся в ней информацию. Содержимое таблин изме- 
нять не разрешается. 


` 


#6 тех! имятаблицы [первый] 


Первым аргументом функции является строковая константа имени 
‚ символьной таблицы. Допустимые имена таблиц - “LAYER”, “LTYPE”, 
“VIEW”, “STYLE”, “BLOCK”, “9С$”, “DIMSTYLE”, “VPORT”. 

При повторном. вхождении TBLNEXT возвращает слелующее вхож- 
дение в указанную таблицу. Если аргумент! первый присутствует и не 
равен nil, чтение таблицы начинается сначала. Если вхождений в табли- 
цу нет, возвращается nil. Если вхождение найдено, возвращается список 
кодов и значений типа DXF. Точки входа, вызываемые из таблицы 
“ВГОСК”, содержат группу -2 с именем первого элемента в описании 
блока. Это имя можно использовать только в функциях ЕМТСЕТ 
и ЕМТМЕХТ, т. е. они программно не модифицируются: 


(tblsearch имятаблицы символ [следующий]) 


Если аргумент следующий присутствует и не равен nil, точка входа 
ТВЕМЕХТ изменяется TaK, чтовы следующий вызов TBLNEXT возвра- 
щал точку входа, следующую за возвращенной. 
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Пример: | 
({Бпеж “ВЕОСК”) 
Возможный возврат: | | 
( (0.. “ВШОСК”) | ‚ тип символа 


> 


‚ (2. “BORDER” ) ‚ имя символа 
(70.0) ‚ флаги 
(10. 9.7 2.0 0.0) ; X, Y, Z базовой точки 


(-2. <Имя примитива: 40000126>) ; первый примитив 


Как уже говорилось, имена примитивов действительны только в те- 
кущем сеансе редактирования. Однако B Автолиспе есть средство, 
позволяющее узнавать примитивы из других сеансов редактирования. 
Это срелство называется меткой. Метки - это просто номер примитива 
в [ГБД. Метки присваиваются‘ примитивам ‘автоматически в процессе 
создания (если были включены), и с ними можно работать ‘из.Автолис- 
па. Для этого в Автолиспе существует функция handent. 


[handent метка] 


` 


Возвращает имя примитива, который указывается строковым Napa- 
метром метка. После того как получено имя примитива, оно может 
быть использовано для дальнейшей работы. 


1.25. Работа © Лисп-программами 


‚Для загрузки в память Автокада, как мы уже видели, используется 
команда (LOAD имя_файла [ошибка]), записываемая в командной стро- 
ке. Ввод расширения .[5р не требуется. | 
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Глава 2 


_ Примеры разработки некоторых программ 


В этой главе собраны некоторые примеры, с помощью которых мы 
попытаемся продемонстрировать приемы программирования отдельных 
задач, решаемых на Автолиспе. 


2.1. Определение границ участка 


Покажем, как можно определить границы участка поверхности, где. 
расположено множество реперных точек-блоков, содержащихся в набо- 
ре. Определим функцию BOUND, формирующую минимальные и Mak- 
симальные значения координат’ X n У прямоугольника, куда входят все 
точки вставок блоков нашего чертежа. | 

Отключим объектную привязку и установим исходные значения 
требуемых переменных. Создадим набор МАВР, куда входят все блоки 
чертежа: | | | 


(defun с:Боипа () 
(setq oss (getvar “озтоае”)) 
(setvar “озтоде” 0) 
(setq пабй nil nabtet nil nabfin nil 
` nabtetn nil nabz nil n 0) 
(setq nabp (ssget “x” '((0 . “ИМЗЕАТ”)))) 


Длина набора NABP - LN: 
(setq In (sslength паЬр)) 


В цикле, выполняемом LN раз, сформируем два набора, содержа- 
щих все компоненты Х и У координат точек вставки блоков - МАВХ 
и МАВУ: | 


(repeat In 

(setq pt (cdr (assoc 10 (entget (ssname nabp п))))) 
(setq nabx (cons (car pt) nabx)) 

(setq naby (cons (cadr pt) naby)}) 

(setq п (1+ n)) 


Вычисление минимальных и максимальных значений координат 
теперь выполняется не просто, а очень просто: 


(setq xmin (eval (cons ‘тм nabx))) 
(setq xmax (eval (cons ‘max nabx))) z 
(setq ymin {eval (cons ‘min naby))) 
(setq ymax (eval (cons ‘min naby))) 
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Однако, если набор имеет очень много членов, может возникнуть 
ошибка: “Слишком много аргументов”. Проверьте свою версию Авто- 
лиспа с помощью задания заданного числа блоков. 


2.2. Развертка поверхности 


Еще один пример - построение развертки трехмерной поверхности. 
Задачи подобного типа встречаются во многих приложениях. Раскрой 
заготовок является предварительным этапом изготовления швейных из- 
делий, сложнопрофильных трубопроводов, изделий их жести ит. п. 

С другой стороны, конструктор сначала проектирует общий вид из- 
делия, а потом формирует развертку заготовки. Хотелось бы хотя бы 
частично автоматизировать этот процесс. 

Займемся сначала простыми поверхностями типа цилиндрических 
и конических. Можно предложить следующий ход решения. Поскольку 
любые поверхности в Автокале аппроксимируются трехмерными граня- 
ми, причем грани определены четырьмя угловыми точками и в некото- 
рых ситуациях эти точки лежат не в одной плоскости, будем считать для 
простоты рассуждений, что грани, образующие поверхность, плоские. 
Выделим первую грань и повернем грань, соприкасающуюся с первой, 
так, чтобы они оказались в одной плоскости. Затем перейдем ко второй 
грани и проделаем ту же операцию. Ограничения, которые были приня- 
ты при постановке задачи, по сути означают, что кажлая грань имеет 
только одного соседа. | 

Решение задачи в этой постановке выглядит следующим образом. 


Определим функцию, решающую задачу: 
(defun c:rslw () 
: Перейдем в мировую систему координат: 
(command “ПСК” “М”) 


Создадим набор под именем A, содержащий набор граней, подле- 
жащих обработке, обозначив его длину LA. Кстати, если вы работаете 
на Автокаде-10 русифицированной версии и его серийный номер 
начинается с 30, функция SSget “x” записывается в виде SSget “Ш”! 


(setq а (ssget “x” ‘((0.. “ЗОРАСЕ”))) 
la (sslength а)) 


Далее начинается цикл по всем граням набора: 
(repeat (1- la) 
Присваиваем` очередной tann имя n3fdf: 
(setą nf3df (ssname а 0) 
‚ Формируем список данных грани nf3df под именем f3df: 
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f3df (entget п! 39!) 
'Дублируем этот список в аа: 
аа 1391 


Выделяем в виде списков координаты каждой из четырех точек гра- 
ни nf3df в списках prl, рг2, pr3, pr4: 


рг1 (саг (assoc 10 (саг (саг f3df)))) 
рг2 (саг (assoc. 11 (cdr (cdr f3df)))) 
pr3 (cdr (assoc 12 (cdr (cdr f3df)))) 
pr4 (cdr (assoc 13 (cdr (cdr f3df)))) 


Удаляем из набора а грань nf3df: 
а (ssdèl nf3df а) 
и следующей грани присваиваем имя nf3df: 
nf3df (ззпате а 0) 
а список ее данных именуем f3df: 
f3df (entget nf3df) 
со’ списками координат точек prll, рг12, pr13, рг 14: 


рг11 (саг (assoc 10 (саг (саг. 139{)))} 
pr12 (саг (assoc 11 (саг (саг 1391 )))) 
pr13 (саг (assoc 12 (саг (саг f3df)))) 
рг14 ‘(саг (assoc 13 (саг (саг f3df))))) 


если точки prl и pr4 не совпадают: 
(if (not (equal рг1 рг4)) 


введем новую систему координат с осью Z, проходящей через эти 
точки: 


(command “ПСК” “zo” pri рг4) 


и повернем весь оставшийся набор. в выбранной системе координат Ha 
угол, вычисляемый через ссылку направления вектора, проходящего 
через начало координат и точку рг11 с конечным углом, соответствую- . 
щим вектору с концом в точке рг2: 


“ПОВЕРНИ” а “” ‘(0 0 0) “С” 
(trans pr11 0 1) (000) 
(trans pr2 0 1) 


Затем перейдем в мировую систему координат: 
“ПСК” “М”) 
и удалим набор аа: 
(command “СОТРИ” аа “”)) 
На этом шаг цикла заканчивается: 
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После выполнения всех поворотов посмотрим на полную картинку: 
(command “покажи” “в”) | 
Конец описания функции rslw: 


Наметим пути усовершенствования программы. Прежде всего по- 
пробуйте расширить класс разворачиваемых поверхностей, учитывая, 
что каждая грань может соприкасаться не с одной следующей, а с двумя 
или тремя. Кроме того, если грань не плоская, ее следует разделить на 
две плоских. 


2.3. Вставка блоков с относительными координатами 


Блоки с атрибутами представляют значительное удобство для’ ввода 
параметров, которые изменяются при вставке в различные места черте- 
жа. Однако возникают задачи, которые традиционными способами 
вставки блоков решить очень трудно. Например, требуется вставить ряд 
блоков через‘одну точку привязки, которая определяется в момент 
вставки первого блока. Традиционый путь - изменить систему коорди- 
нат при вставке первого блока, а -затем задавать точки вставок после- 
дующих в новой системе координат. 

Поступим несколько иначе. Для этого воспользуемся программой 
Ref, которая иместся‘в стандартном приложении к Автокалу. Несколько 
изменим ее так, чтобы предыдущая точка, записываемая в системную 
переменную LASTPOINT, не изменялась до окончания последнего BBO- 
да набора блоков, текста или других элементов чертежа: 


(defun ге!1 () 
(И (= rpt nil) 
(setq rpt (setvar “LASTPOINT” 
(getpoint “Точка ссылки: “))) 
) 


 (getpoint “\пВведите относительные координаты (с @): “) 


Предполагается, что в течение сеанса вставки группы' блоков, Mac- 
штабы по X, У и Z не изменяются. Не изменяется и угол вставки бло- 
ков. Конечно, если это не устраиваст, можно программу изменить и все 
необходимые действия запрограммировать. 

Итак, сначала запомним соответствующие системные переменные - 
и установим их так, чтобы они не мешали при работе новой команды: 


(defun C:tinsert() 
(setq cmd (getvar “cmdecho”) 
bpm (getvar “blipmode”)) 
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(setvar “cmdecho” 0) 
(setvar “blipmode” 0) 


Затем можно поступить по-разному. Мы просто сформируем KO- 
мандную строку вызова команды ВСТАВЬ и включим ее в цикл, выход 
из которого обеспечивастся при вводе nil на запрос очередной точки 
вставки в относительных координатах: 


(зе namb (getstring “\пИмя блока: “) 
scx (дегеа! “nX Масштаб <1>: “)) 
(if (eq scx nil) (setq scx 1.0)) 
(setq scy (getreal “\nY Масштаб <1>: “)) 
(if (eq scy nil) (setq scy 1.0)) 
(setq sca (getangle “\пУгол поворота <0>: ")) 
(if (eq sca. nil) (setq sca 0.0)) 
(setq rpt nil). 
(while (not (eq (setq apt (ref1)) пй)). 
(command “Вставь” namb qpt scx scy sca) 
' (setvar “lastpoint” rpt) a 
) 
Осталось вернуть исходные значения системным переменным и 34- 
кончить программу: | 


(зеуаг “cmdecho” cmd 


(setvar “blipmode” bpm) 
(princ) 


Блок будет вставляться в относительных координатах до тех пор, 
пока вы не нажмете “ЕМТЕК” на запрос новой относительной точки 
ввода. 


2.4. Программная вставка блоков с атрибутами 


Попробуем решить более сложную задачу. Пусть`теперь у нас бло- 
ки с атрибутами. Если атрибуты постоянны или вставляются через Ha- 
логовое окно, проблем не возникает. Просто перед вставкой блоков 
нужно установить системную переменную ATTDIA в единицу. 

`При вставке блоков с атрибутами, вводимыми через строку под- 
сказки, потребуется в строку команды ВСТАВЬ добавлять слово “pause” 
столько раз, сколько у блока контролируемых атрибутов, да еще столько 
же “раизе” на проверку правильности их ввода, T. €. удвоенное число 
количества контролируемых атрибутов, видимых или невидимых. Для 
определения числа атрибутов вставим “пробный” блок и проанализиру- 
ем его атрибуты. Для подавления запросов о вставке атрибутов устано- 
вим системную переменную АТТКЕО в нуль. Затем подсчитаем число 
атрибутов, которые установились со значениями по умолчанию: 
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(зеуаг “attreq” 0) 
(command “insert” namb (list O 0) 0.01 0.01 sca) 


Затем восстановим значение переменной ATTREQ и установим 
ATTDIA в нуль, а имя толко что’ вставленного блока’ запишем. в пере- 
менную att: | 


(setvar “аЦгед” 1) 
(зеуаг “attdia”. 0) 
(setq att (entlast)) 
(setq natt att) 


Установим ИНЬ подсчета требуемого числа пауз в нуль: 
(setq праизе 0) 


Заготовим начало командной строки с именем блока, оч встав- 
KH, которая будет вычисляться аналогично предылущей залаче,. масигта- 
бами вставки и углом поворота: 


(setq comm ‘(command “insert” namb ар scx scy sca)) - 


Поскольку команда CONS добавляет к строке спереди. обратим заго- 
товку команды: . 


(setq comm (reverse сотт)) 
Далее проанализируем все атрибуты данного блока: 


(while (eq (саг (assoc O (entget 
(setq att (entnext att))))) ATTRIB”) 


Если блок вилимый (его признак установлен. B 4), тогда перемен- 
ной с именем, записанным в имени атрибута, присваиваем значение ат- 
рибута, который является выражениям Автолиспа, предварительно осво- 
бодившись от кавычек с помошью функции read, одновременно 
сосчитав требуемое лля вставки данного сорта атрибутов число пауз: 


(ргодп 
(setq праизе (1+ праиз$е)) 
(if (ea (cdr (assoc 70 (entget att))) 4) 
(set (read (cdr (assoc 2 (entget att)))) 
(read (cdr (assoc 1 (entget att)))))) 


Если блок невидимый; в нем: содержатся параметры, определяющие 
получаемую функцию, и их значение требуется вводить при каждой 
вставке блока. Получаемые вычисленные значения дописываем B CMH- 
сок, выполнение которого обеспечит вставку требуемого блока: 


(it (eq (саг (assoc 70 (entget att))) 5) 
(pragn 

(setq npause (1+ npause)) 

(princ “Attribute “) 

(princ (cdr (assoc 1 (entget att)))) 
(princ) 

(set (read (cdr (assoc 2 (entget att)))) 
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(дегеа! “\ппри{ attribute: “)))) 
(setq ata (eval (read (саг (assoc 2 (entget att)))))) 
(setq comm (cons ata comm)))) 


Затем B список добавляем подсчитанное количество пауз: 


(repeat npause 
(setq comm (cons ‘pause comm))) 


Обрашаем список B правильное положение: 
(setq comm (reverse соглт)) y | 


Включаем. системную переменную СМПРЕСНО в единицу для npo- 
ведения диалога: 


(земаг “стаеспо” 1) 
И проводим вставку блока: 
‚ (eval comm) , 
Восстанавливаем системные переменные и заканчиваем залачу. 
удаляя вставленный. предварительно блок: 


(зе \маг “lastpoint” rpt)) 

(setvar “стаеспо” 0) 

{command “erase” natt “” “гедгам/”) 
(setvar “стаесво” cmd) 

(setvar “texteval” txx) 

(princ) 


2.5. Блоки с памятью o последней вставке 
(создание основной надписи чертежа] 


Формирование значений атрибутов по умолчанию происходит 
в момент их создания. Каждый раз при вставке нового блока.с атрибу- 
тами вам предлагается набор атрибутов по умолчанию. самого первого 
поколения. В некоторых ситуациях хотелось бы, чтобы B качестве 
значений по умолчанию. предлагались значения, которые вводились 
в последнем сеансе вставки блока. Покажем, как это можно организо- 
вать при формировании ‘основной надписи (штампа) чертежа. Заодно 
покажем, как можно использовать строку из. меню ACAD.MNU “Фор- 
мат” для задания поля чертежа, установки переменных для простановки 
размеров и создания основной надписи чертежа. Мы несколько MOAM- 
фицируем файл SETUP.LSP, добавив туда строки формирования основ- 
ной надписи: | | 


(apply ‘(lambda () 
(princ “\пРаботаю...”) 
(setq a (getvar “cmdecho”)) 
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(setvar “спаеспо” 0) — 
(setq b (де!маг “Бйртоде”)) 
(setvar “blipmode” 0) 
(setvar “lunits” и). 
(command 
“ЛИМИТЫ” “0,0” (list (* хс) (*yc)) 
“ЛМАСШТАБ” (* 25 с) 
“РАЗМЕР” “РЗММАСШТ” с “ВЫХОД” 
“Отрезок” “0,0” (polar (деуаг “lastpoint”) O (*хс)) 
(polar (getvar “lastpoint”) (/ pi 2.0) (* у.с)) 
(polar (getvar “lastpoint”) pi (*®x c)) 
“Замкни” | 
“Регенавто” “откл” ) 
(setq xI (* x c) у! (* ус)) 
(cond ((апа (equal и 1)(equal т 1.0)) 
(setq x (rtos x 1 0) у (rtos y 1 0)) 
(setq b “мм”)) 
((and (equal u 2)(еадца! m 1.0)) 
(setq x (rtos x 2 0) y (rtos y 2 0)) 
(setq b “мм”)) 
((and (equal u 1)(еаца! m 1000.0)) 
(setq x (rtos x 1 3) y (rtos y 1 3))- 
(setq b “м”)) 
((and (equal и 2)(едиа! m 1000.0)) 
(setq x (rtos x 2 3) y (rtos y 2 3)) 
(setq b “м”)) 
((equal u 3) 
(setq x (rtos x 3 2) y (rtos y 3 2)) 
(setq b “")) 
((equal u 4) 
(setq x (rtos x 4 2) y (rtos y 4 2)) 
(setq b “”)) ) 
(setq a (strcat “\nBaw экран сейчас отображает область “ x b “а “y “. “)) 
(setvar “coords” 2) 
(setq b c) 


“Эти строки почти дословно повторяют соответствующий текст 
стандартного файла SETUP.LSP 10-й версии Автокадла. 
Далее создадим стиль заполнения основной надписи штампа: 


(command “стиль” “СТАНДАРТ” “italice” 0 0.6 0 “H” “H” “н”) 


Теперь откроем текстовый файл, в который будет писаться содер- 
жимое вновь введенных атрибутов. Если такого файла нет, вставим блок 
с первоначальными значениями по умолчанию через диалоговое окно: 
(setq tb (open “tbomag.txt” “г”)) 

(if (not tb) 

 (progn 

’_ (зауаг “attdia” 1) í 
(command “Вставь” “preon” (list xl 0) b “” 0)) 
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Если же файл существует, установим системную _ переменную 
ATTDIA в нуль и в качестве вставляемых значений атрибутов: использу- 
ем содержимое файла: 


(progn 

(setvar “attdia” 0) 

(while (not (setq tomag (read (read-line 16))))) 

(close tb) 

(command “Вставь” “preon” (list xi 0) b “” O (nth 1 tbmag) 
(nth 2 tomag)(nth 3 tbmag)(nth 4 tbmag)(nth 5 tomag) 

(nth 6 tomag)(nth 7 tomag)(nth 8 tomag)(nth-9 tbmag) 

(nth 10: tomag)(nth 11 tbmag)(nth 12 tomag)(nth 13 tomag) 
(nth 1 tobmag)(nth 2 tomag)(nth 3 tomag)(nth 4 tomag) 

(nth 5 tomag)(nth 6 tbomag)(nth 7 tomag)(nth 8 tomag) 


(nth 9 tbmag)(nth 10 tomag) 
(nth 11 tbmag)(nth 12 tomag)(nth 13 46тад)) 


’Для возможных изменений в перечне атрибутов вызовем команду 
“ДИАЛАТР”: 


(command “Диалатр” (entlast)))) 


Выделим из созданного блока значения атрибутов и запишем их 34- 
ново в файл: 


(setq blm (entlast)) , 

(setq tb (open “tomag.txt” “w”)) 

(setq tomag '(“Список.данных штампа”)} 

(while (/= (cdr (assoc 0 (entget (entnext Ыт)))) “SEQEND”) 
(setq tomag (cons (cdr (assoc 1 (entget 

(entnext Ыт)))) tomag)) 

(setq blm (entnext Ыт))) 

(setq tomag (reverse tomag)) 

(prin1 tomag tb) 

(close tb) 


Затем вставляется еше один блок в правом верхнем углу рамки чер- | 
тежа и дорисовываются требуемые линии: 


(command “Вставь” “2оп” (list O yi) b “” O (nth 10 tbmag)(nth 10 rabi | 
(setq аа (list (- xi (* 5 b)) (* 60 b))) 
(setq bb (list (- х! (* 5 b)) (- yi (* 5 b)))) 
- (setq сс (list (* 20 b) (- yl (* 5 b)))) 
(command “плиния” (list (* 20 b) (* 5 b)) 
“w” (*.0.5 b) “” 
(list (- xi (* 190 b)) (* 5.0 b)) “”) 
(command “плиния” aa bb ec “”) 
(command “плиния” (list (* 20.0 b) (* 291.7978 b)) 
(list (* 20.0 b) (- У (* 5.0 b))) =”) 
(command “плиния” (list (* 20 b) (* 5 b)) (list (* 206) 
(- У (* 5.0 b))) “”) 
(princ a) 
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(setq x nil y nil a nil аа nil bb nil сс nil 
b nil d nil c nil m nil u nil tomag nil Ыт nil tb nil) 
(command “Регенавто” “вкл” “Покажи” “Все”) 


(рйпс))'()) 


2.6. Построение линий пересечения двух 
поверхностей 


Решение этой задачи компенсирует некорректную работу команды 
Автокала СКРОЙ (HIDE), которая не обрабатывает пересекающиеся 
трехмерные грани с проведением линии их пересечения. Для получения 
более реалистической картины Изображения перед выполнением коман- 
ды СКРОЙ можно построить линии пересечения, которые проводятся 
‚ в виде отрезков. В некоторых случаях эта задача полезна для выполне- 
ния сложных построений составных поверхностей. В 12-й версии Авто- 
кала команды РОК все это выполняют более изящно: 


(defun pli (ра / phi dphi1 dphi2 dphi3 рт) 


Определение принадлежности точки внутренности 3M грани, задан- 
ной точками р41, p42, p43 и р44: 


(setq p41 (trans pr1 O 1) 
p42 (trans pr2 0 1) 
о (trans pr3 0 1) 
p44 (trans рг4 0 1)) 
(setq phi (- (angle ра р41) (апое ра p44))) 
(И (>= (abs phi) pi) | 
(setq phi (- phi (7 (* 2 pi (abs phi)) phi)))) 
(setq dphi1 (- (angle ра p42) (angle ра p41))) 
(if (>= {abs dphi1) pi) 
(setq dphi1 (- dphi1 (/ (* 2 pi (abs dphi1)}) dphit)))) 
(setq dphi2 (- (angle ра p43) (angie ра p42))) 
(if (>= (abs dphi2) pi) 
(setq dphi2 (- dphi2 (/ (* 2 pi (abs dphi2)) dphi2)))) 
(setq dphi3 (- (angle ра p44) (angle ра p43))) 
(if (>= (abs dphi3) pi) 
(setą dphi3 (- dphi3 (/ (* 2 pi (abs dphi3)) dphi3}))) 
(setq phi (+ phi dphi1. dpħi2 dphi3)) 
(if (< (abs phi) 0.0001) 
Если точка вне контура, рт=Т 
(setq pin T) (setq pin пй)) 
) 


‚Проведение линии пересечения 
(defun crr (ps ре / nam) 

(if (and (not (equal ps T)) 

(not (equal pe T))) 
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(ргодп 

(setq f1 (pli ps)) . 

(setq f2 (pli pe)) - 
(command “ОТРЕЗОК” ps pe “”) 

(setq nam (entlast)) | 


‚Если концы линии выходят за контур, они обрезаются 
(if (= f1 T) (ргодп 

(command “ОБРЕЖЬ” pll “” ps “”) 

(setq nam (entlast)))) 

(if (= f2 T) (progn 

(command “ОБРЕЖЬ” pli “” pe “”) 

(setq nam (entlast)))) , 


‚Если точки вне контура грани, линия удаляется 
(setq pqs (cdr (assoc 10 (саг (саг (еде пат)))))' 
рае (cdr (assoc 11 (саг (саг (entget пат))))) 

pas (trans ра$`0 1) 

рае (trans рае 0 1)) 

(setq f1 (pli ра$5)) 

(setq f2 (pli pqe)) 

(setq f3 (and f1 f2)) á 
(if (= f3 T) (command “COTPH” nam “”)))) 

) 

(defun pc (ps pe / рсх рсу pez pcr) 


_ Нахождение точки пересечения ребра и его проекции 
‚Если обе точки лежат по одну сторону грани, точка не определяется 
‚и ей присваивается значение Т 
(И (>= (* (садаг ps) (садаг ре)) 0.0) 
(setq pcer T) 
(progn 
(setq pcx (+ (car ps) (/ (* (caddr ps) (- (car ps) (саг pe))) 
(- (caddr pe) (caddr ps)))) 
рсу (+ (cadr ps) (/ (* (caddr ps) (- (cadr ps) eaa pe))) 
(- (caddr ре) (caddr ps)))) 
‚ pcz 0.0 
por (list pcx рсу pez)) 
))) 
(defun c:ċross (/ fm sm a a1 la la1 st $1 pr1 pr2 pr3 рг4 nf3af f3df nf3df1 
f3df1 рг11 pr12 pr13 pr14 р1 p2 p3 p4 p5 рб p7 p8 pll) 
(setq sblip (getvar “blipmode”) 
scmde (getvar “cmdecho”)) 
(setvar “blipmode” 0). 
(setvar “cmdecho” 0) 
(setq fm (car (entsel “\пУкажите первую сеть: “)) 
sm (car (entsel “\пУкажите вторую сеть: “))) 
(command “слой” “c” “fm” “” 
“слой” “c” “sm” “” 
“свойства” ÍM “” “сл” “fm” “” 
“свойства” sM “” “сл” “sm” “” 
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“РАСЧЛЕНИ” fm “РАСЧЛЕНИ” sm) 

(setq а (ssget “x” ‘((0. “ЗОРАСЕ”) (8. “fm”))) 

la (sslength а) 

a1 (ssget “x” ‘((0. “ЗОРАСЕ”) (8 . “sm”))) 

la1 (sslength a1) 

st 0) 

(setvar “flatland” 0) 

(repeat la 

(command “NCK” “M”) 

(setq st1 0 

st (1+ st) 

nf3df (ssname a (1- st)) 

f3df (entget nf3df)- 

aa f3df 

рг1 (cdr (assoc 10 (саг (саг f3df)))) À | к 
рг2 (cdr (assoc 11 (саг (cdr f3df)))) 
pr3 (cdr (assoc 12 (cdr (cdr f3df)))) 
pr4 (cdr (assoc 13 (cdr (cdr f3df))))) 
(if (and (not (equal pr1 pr4)) 

(not (equal pr2 pr4)) 

(not (equal pr1 pr2))) 

(progn 

(command “ПСК” “O” nf3df) 

(repeat la1 ye | 
(setq $11 (1+ $1) , 
nf3df1 (ssname а1 (1- st1)) 

f3df1 (entget nf3df1) 

рг11 (cdr (assoc 10 (cdr (саг f3df1)))) 
pr12 (cdr (assoc 11 (cdr (cdr f3df1)))) 
pr13 (cdr (assoc 12 (cdr (cdr f3df1)))), 
pr14 (cdr (assoc 13 (cdr (саг f3df1))))) 
(if (and (not (equal pr1 pr4)) 

(not (equal pr2 pr4)) 

(not (equal pr1 pr2))) 

(progn 

(command “слой” “с” “3” “ц” “4” “” “”) 
(setq p1 (trans рг11 0 1) 

p2 (trans рг12 0 1). 

p3 (trans pr13 0 1) 

p4 (trans рг14 0 1) 

p5 (pc p1 p2) 

p6 (pc p2 p3) 

p7 (pc p3 p4). 

p8 (pc p4 p1)) 

(command “плиния” (trans pr1 0 1) 
“ш” O O (trans pr2 0 1) 

(trans pr3 O 1) 

(trans рг4 0 1) “замкни”) 

(setq pli (entlast)) 
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(crr p5 рб). 
(crr p5 p7) 
(crr p5 p8) 
(crr рб p7) 
(crr p6 p8) 
{crr p7 p8) 
(command “СОТРИ” pll “” “ОСВЕЖИ”) 

D) 

) 

) | | 
(command “СЛОИ” “с” “1” “” “ОСВЕЖИ”) 
(setvar “blipmode” sblip) 

(setvar “cmdecho” scmde) 


) 


Написав на Автолиспе программу. содержащую много раз выпол- 
няемый цикл, вы тут же убедитесь в том, что Автолисп - медленный 
язык. Это связано с тем, что вычислитель Автолиспа - это интерпрета- 
тор, и в этом смысле подобен Бейсику. Иначе говоря, программа на Ав- 
толиспе - это, собственно. не программа, а данные для вычислителя 
Автолиспа. Выполняя, например, цикл, вычислитель Автолиспа MHOTO- 
кратно интерпретирует одни и те же строки программы, не “понимая” 
того, что эта работа уже была один раз проделана. Чтобы убедиться 
в этом, загрузите и выполните программу на Автолиспе fplot, входящую 
в комплект стандартной поставки Автокада. Если вы работаете только 
с функциями Автокала и вводом/выводом данных, то скорость вычисле- 
ний не особенно критична, но, как только возникнет необходимость. 
в большом объеме вычислений, Автолисп перестанет вас удовлетворять. 

Значит ли это, что Автолисп исчерпал свои возможности? Оказыва- 
ется, нет. Этот недостаток Автолиспа 10-ой версии устранен с появле- 
нием компилятора Автолиспа. Какие же преимущества имеет откомпи- 
лированная программа на Автолиспе по сравнению с обычной? 

e В 15-20 раз повышастся быстродействие, как за счет собственно OT- 
каза ог интерпретации программ, так и за счет увеличения быстро- 
действия постраничной виртуальной памяти. | | 

èe Загрузка программ в память происходит втрое быстрее, поскольку 
теперь при загрузке программы не требуется проверять. ее на пред- 
мет наличия синтаксических ошибок. 

e В среднем влвое уменьшаются требования к объему памяти как для 
кода программ, так и для данных - компилированные функции мо- 
гут содержать больше данных. 

èe Компилятор обеспечивает работу как со стандартным, так и с pac- 
ширенным Автолиспом. Компилированные и интерпретированные 
функции могут комбинироваться как угодно и вызывать друг друга. 
Большинство имеющихся в настоящее время приложений на Авто- 
лиспе можно откомпилировать без каких-либо изменений, обес- 
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печив тем самым резкое увеличение скорости выполнения. как са- 
мых простых, так и наиболее сложных специализированных про- 
грамм. 

e Используя новые возможности отладки программ при работе с pac- 
ширенным Автолиспом, вы можете прервать выполнение сложной 
программы в любом месте, просмотреть или изменить значения пе- 
ременных, выполнить некоторые отладочные операции и продол- 
жить работу. 

e Как отметил Фил Ротуэлл, один из разработчиков системы, Автокад, 
применение компилятора позволит вам не беспокоиться об автор- 
ских правах - защита ваших программ обеспечена. 


Использование в ll- й и 12-й версиях Автокада разработок на Си 
снимает необходимость использования компилятора Автолиспа, MO- 
скольку для коммерческих и быстродействующих приложений можно 
воспользоваться именно этим способом разработки приложений. 
Поэтому для Автолиспа в 11-й и 12-й версиях компилятор не разраба- 
тывался. , | 

Здесь мы только косну лись поверхности оксана возможностей, пре- 
доставляемых Автокадом, описали логику его построения и использова- 
ние Автолиспа в работе с базой данных Автокада. Для более глубокого 
изучения Автолиспа обращайтесь к учебникам программирования на 
Автолиспе, выпущенным издательством Addison Wesley, - например, 
к книге Winston and Horn “LISP” (second edition) или прекрасному 
учебнику T. Hasemer “Looking at LISP”. В качестве полезного спра- 
вочника по Автолиспу можно рекомендовать также книгу “Автолисп. 
Руководство по программированию”, изданную на русском языке. 

Вот некоторые полезные приемы, использование которых является 
признаком “хорошего стиля” работы на Автокаде: 

e Используйте Автолисп для создания своих макроопределений Me- 
ню, более сложных и “умных”, чем стандартные. 

e По возможности вычисляйте значения. параметров, старайтесь реже 
запрашивать пользователя ввести ту или иную величину - это 
уменьшит вероятность ошибок при вводе. | 

e Старайтесь; чтобы создаваемые макроопределения содержали как 
можно больше подсказок - это также помогает уменьшить вероят- 
ность ошибок. 

Используйте функции СЕТ для ввода данных. 

e Старайтесь без необходимости не объявлять переменные глобаль- 
ными. - это засоряет память, создает MONORON путаницу, 
уменьшает скорость выполнения функций. 

Для использования функций Автокада применяйте стандартную 
функцию COMMAND. 
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Помните, что, используя в функции defun объявление: С:, вы може- 
те расигирить список команд Автокадла. 


Используйте функции AND/OR ДЛЯ. ИЯ вывода на экран. 
разных сообщений по условию. 


Старайтесь ° защититься от неправильного ввода’ функцией 


GETKWORD или, если это невозможно, организуйте цикл WHILE. 


Делайте вашу программу нечувствительной к разнице между строч- 
ными и прописными буквами, используя функцию’ OR или 
STRCASE. 


Глава 3 


Диалоговые окна в Автокаде 


При создании достаточно сложных программ ввод исходной MH- 
формации через командную строку не всегда бывает наглядным и удоб- 
ным. Ведение диалога с программой можно усовершенствовать, исполь- 
зуя средства самого Автокала: здесь в нашем распоряжении графические 
меню, средства редактирования атрибутов и диалоговые окна. Для. 10-ой 
и 11-ой версий Автокала применение диалоговых окон было ограничено 
либо созданием вспомогательных программ, описываемых как внешние 
функции с послелующей передачей параметров через текстовые файлы, 
читаемые командами Автолиспа, либо программами на Автолиспс, 
управляющими текстовым режимом экрана через драйвер ansi.sys nepe- 
дачей Е$С-последовательностей, управляющих фоном текста и заполне- 
нием строк требуемой информацией. Примером такой программы 
может служить программа предварительного ввода ‘данных в диалоге 
на текстовом экране: | 


(ТЕХТ$СВ) 

(DEFUN МЕМУ-ОРЕВАТМ (HEADER ITEM-LIST РАМРТ COLOR / НСТ WDT | L-COL) 
(MENUL_INIT color1) 

‚ (PAINT_BKGRND TOP_MARG L_COL HGT WDT color1) 
(PAINT_FRAME TOP_MARG L_COL HGT WDT) 
(PRINT_HEADER TOP_MARG L_COL WDT) 
(PRINT_ITEMS ITEM-LIST TOP_MARG L_COL color1) 
(PRINT_PRMPT PRMPT TOP_MARG L_COL HGT) 
(USR_VAL) 

(DEFUN MENULINIT (COLOR) 

(TEXTSCR) 

(CLS) 

(NORMAL) 

(PRINC (STRCAT “\е[” (ITOA COLOR) “m”)) 

(IF (/= (REM (STRLEN HEADER) 2) 0) 

(SETQ HEADER (STRCAT HEADER “ “))) 

(SETQ HGT (+ 5 (LENGTH ITEM-LIST)) 

WDT (+ 10 (MAX (LONGEST ITEM-LIST) (STRLEN HEADER)))) 
(IF (/= (REM HGT 2) 0) (SETQ HGT (1+ HGT))) 

(IF (/= (REM WDT 2) 0) (SETQ WDT (1+ WDT))) 
(SETQ L_COL (- 40 (/ WDT 2)) 

iO 

TOP_MARG (- 12 (/ HGT 2)))) 

(DEFUN PAINT_BKGRND (RW CL HT WD COLOR) 

(IF (> COLOR 40) ' 

(PROGN (GOTO (1+ RW) (1+ CL)) 
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(REPEAT (- НТ 1) 

(REPEAT (- WD 2) (PRINC " “ )) 
(NEXTROW (- WD 2)))))) 
(DEFUN PAINT_FRAME (RW CL HT WD) 
(GOTO RW CL) | 
(PRINC (СНВ 201)) 

(REPEAT (- WD 2) 

(PRINC (CHR 205))) 

(PRINC (CHR 187)) 

(REPEAT 3 

(NEXTROW WD) 

(PRINC (CHR 186)) 

(MOVE (- WD 2) “С”) 

(PRINC (СНВ 186))) 

(NEXTROW М/О) 

(PRINC (СНВ 204)) 

(REPEAT (- WDT 2) (PRINC (СНВ 205))) 
(PRINC (CHR 185)) 

(REPEAT (- HT 5) 

(NEXTROW WD) 

(PRINC (CHR 186)) . 

(MOVE (- WD 2) “С”) 

(PRINC (CHR 186))) 

(NEXTROW WD) 

(PRINC (CHR 200)) 

(REPEAT (- WDT 2) (PRINC (СНВ. 205))} 
(PRINC (CHR 188))) x 
(DEFUN PRINT_HEADER (RW CL WD) 
(GOTO (+ RW 3) 

(+ CL (- (/ WD 2) (/ (STRLEN HEADER) 2)))) 
(BOLD) 

(PRINC HEADER) 

(NORMAL) =. | 

(DEFUN PRINT_HEADER (RW С! М/О) 
(GOTO (+ RW 2) 

(+ CL (- (/ WD 2) (/ (STRLEN HEADER) 2)))) 
(BOLD) 

(PRINC HEADER)) 

(DEFUN PRINT_ITEMS (ITM_LST RW CL COLOR) 
(PRINC (STRCAT “\е[От\е[ ” (ITOA COLOR) “m”)) 
(SETQ 10) | 

(FOREACH ITEM ITM_LST 

(SETQ I (1+ 1)). 

(GOTO (+ RW 4) | 

(+ СЁ 2)) _ 

(MOVE | “В”) 

(PRINC (ЗТВСАТ “ “ 

(IF (< 110)“ “ “”) 

(RTOS (FLOAT |) 2 0) “] “ ПЕМ)))) 
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(DEFUN РАМТ_РАМРТ (РАМРТ RW CL HT) 

(NORMAL) 

(GOTO (+ RW HT 3) 0) 

(PRINC PRMPT) 

(GC)) 

(DEFUN USR_VAL () 

(NORMAL) , 

(SETQ CHOICE (GETINT)) 

(WHILE (OR (< CHOICE 1) (> CHOICE (LENGTH ITEM-LIST))) 
(SETQ CHOICE (GETINT “Выбор вне диапазона, повторите: “))) 
(CLS) 

(LIST CHOICE (nth (1- CHOICE) ITEM-LIST))) 

‚Длина самой длинной строки определяет ширину таблички 
(DEFUN LONGEST (LST) 

(APPLY ‘MAX (MAPCAR ‘(LAMBDA (ITM) (STRLEN ITM)) SEH 
(DEFUN BOLD () 

(PRINC “\е[1т”)) 

(DEFUN NORMAL () 

(PRINC “\el[O0m")) 


Группа этих подпрограмм формирует рамку с бордюрами Ha TEK- 
стовом экране лля заполнения ее строками с альтернативным выбором 
соответствующего номера, который затем анализируется и используется 
на последующих этапах решения общей задачи. 

Функция Al: 


(defun A1 () 

(setq color1 41) 

(setq aa1 

(menu-operation “Выбор типа изделия” 

‘(“Форма по ГОСТ 2209-82 типа 06” 

“Форма по ГОСТ 2209-82 типа 16” 

“Форма по ГОСТ 2209-82 типа 07” 

“Форма по ГОСТ 2209-82 типа 38” 

“Форма по ГОСТ 19042-82 и ТУ 48-19-307-86 типа V, С, D” 
“Форма по ГОСТ 19042-82 и ТУ 48-19-307-86 типа w”). 
“Выберите соответствующий тип для проекта: 

(ran_color) ))) 


” 


Несмотря на ограниченность такого подхода к формированию диа- 
логовых окон, они оказались весьма полезными во многих прикладных 
задачах. 


В 12-й версии Автокала число диалоговых окон в самом графичес- 
ком редакторе резко расширилось и появилась целая система программ- 
`ного формирования диалоговых окон - язык управления диалогом DCL 
вместе с комплексом команд Автолиспа, дающих возможность вызова 
и управления диалогом из Лисп-программ. Все это значительно расши- 
ряет. возможности адаптации `Автокала под конкретные прикладные 
задачи. 
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3.1. Язык управления диалогом - DCL 


Диалоговые окна в 12-й версии Автокада определяются текстовыми 
файлами, написанными на DCL. Эти файлы имеют расширение dcl. 
В них содержится описание способа вывода окна и его состав: клавиши, 
списки, скользяшие шкалы, кнопки выбора и т. п. Правила конструиро- 
вания диалоговых окон задают ограничения на’ размер и мёсто распо- 
ложения окна. Расположение элементов окна очень похоже на располо- 
жение абзацев в сформатированном тексте, поэтому нет необходимости 
задавать точные координаты фрагментов окон. = 

Диалоговое окно из меню Автокада вызывается через функцию 
Автолиспа или внешнюю функцию СРП (Средства Разработки Прило- 
жений), которые управляют диалоговым окном. 

В каждом диалоговом окне содержится одно или несколько полей, 
определяющих функции окна. К основным типам полей относятся ба- 
зовые поля: клавиши, кнопки, текстовые поля, скользящие шкалы, поля 
списков, поля изображений. Поля могут обрамляться рамками. Можно 
комбинировать поля, создавая ряды и колонки. Каждое диалоговое окно 
рассматривается как древовидная. структура, вершина которой представ- 
ляется на языке DCL как’ dialog. Управление появлением и поведением 
поля на этом языке осуществляется атрибутами поля. Можно опреде- 
лить новые поля (прототипы) и группы полей, которые не связаны 
с обыкновенными диалоговыми окнами. На прототипы можно ссылать- 
ся и изменять при необходимости их атрибуты и предварительно опре- 
деленные поля. Объединения используются только для внешних ссы- 
лок. Их атрибуты изменять нельзя. 


Переключатель 


Колонка в рамке 


Текстовое: поле 


ESES а" 


Здесь выдается 
сообщение об ошибке 


Объединение 
ok_cansel 


На этом рисунке показан пример структуры диалогового окна.. 
Уровни дерева - это встроенные поля, а вершина дерева - примитив 
диалога. Описание диалогового окна дается на языке DCL, отражающем 
его древовидную структуру. 


Предварительно определенные активные поля 


Предварительно определенные поля непосредственно поддержива- 
ются средствами программируемых диалоговых окон Автокада. Их оп- 
ределения содержатся в файле base.dcl в виде комментариев. При выборе 
активного поля диалоговое окно извещает об этом приложение (про- 
грамму на Лиспе или Си), управляющее `диалоговым окном. . Подобная 
операция называется действием или вызовом с возвратом. Любое предва- 
рительно определенное активное. поле имеет соответствующий видимый 
внешний эффект (например. раскрытие списка или закрытие диалога 
при указании клавиши “ДА”) или внутренний эффект. В этом случае 
вырабатывается код причины, смысл которого зависит от типа поля, его 
инициировавшего. 


> Tun поля 


Клавиша - button: Поле диалогового окна, напоминающее обычную 
клавишу клавиатуры. Клавиши предназначены для выполне- 
HHA действий, имеющих внешний эффект для пользователя: 
закрытие: диалогового окна, появление еще одного окна и т. д. 
Все диалоговые окна содержат клавишу “Да” или ее эквива- 
лент, позволяющую выполнить действие окна, а многие окна - 
клавишу “Отмена”, позволяющую пользователю покинуть 
диалоговое окно без внесения каких-либо изменений. 


Атрибуты 
label: Метка - строка, заключенная в кавычки (значения по умолча- 
нию нет. Определяет надпись, которая появляется на клавише. 
is_default: Возможные значения: true или false (по умолчанию - false). 
Если значение truc, клавиша является клавишей по умолчанию 
и указывается, когда пользователь нажимает клавишу 
“RETURN”. Если пользователь работает в текстовом поле, 
поле списка или клавише изображения, имеющих атрибут 
а|о\ _ассер!, установленный в true, клавиша по умолчанию 
‘также выбирается путем указания клавиши принятия или (для 
полей списка и клавиш изображения) выполнения двойного 
указания с помощью кнопки выбора устройства указания. 
Клавиша по умолчанию не выбирается при нажатии клавиши 
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выполнения, если подсвечена другая клавиша: в этом случае 
будет выбрана подсвеченная клавиша. 

Клавиша по умолчанию выводится на экран отличным 
от других клавиш способом, например с помощью дополни- 
тельной рамки. 

Только одна клавиша в диалоговом-окне может иметь 
значение атрибута is_default, равное true. 

iS cancel: Возможные значения: true или false (по умолчанию - false). 

Если значение име, клавиша выбирается при нажатии клавиши 
отмены (например, ESC или Ctrl+C). | 

Только одна клавиша в диалоговом окне может иметь 
значение атрибута is_cancel, равное име. Клавиша, имеющая. 
установленный в true атрибут 15_сапсе!, закрывает диалоговое 
окно после выполнения действия или вызова с возвратом. 


> Tun поля 


Текстовое поле - edit_box: Поле в котором пользователь может вводить 
или редактировать текстовую строку. Если вводимый текст 
‚ превышгает размеры текстового поля, его можно “прокрутить” 
в горизонтальном направлении. 


Атрибуты ` 
Label: Значение - строка, заключенная в.кавычки (по умолчанию - 
пустая - “ ~“). Текст выводится слева от поля. Если он опрелде- 


лен, атрибут выравнивается влево по ширине текстового поля. 
Edit_width: Возможные значения: целое или вещественное число. 
‚ Ширина редактируемой части. поля, ограниченной рамкой TeK- 
стового поля в единицах ширины символ. Если атрибут 
HC указан или установлен в нуль и ширина поля не ограниче- 
на, рамка расширяется настолько, насколько это возможно. 
Если значение атрибута не равно нулю, рамка выравнивается 
вправо внутри занятого полем пространства. Если необходимо 
вытянуть поле, можно при компоновке вставить пробелы меж- 
ду атрибутом и редактируемой частью поля, средствами РОВ. 
Edit_limit: Значение - целое число (по умолчанию - 132); максимум - 
256. Максимальное число символов, которое может ввести 
пользователь в текстовое поле. Когда этот предел достигается, 
драйвер монитора отбрасывает дополнительные СИМВОЛЫ 
(кроме Backspase или Del) и выдаёт сигнал. 
Value: оначение. - строка, заключенная в кавычки (по умолчанию - 
пустая - * ^). Исходное значение текстовое, размещенное в 
рамке. Значение выравнено влево в редактируемой части поля. 
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Значение текстового поля всегда заканчивается пустым 
вводом. (\0 или EOS). Если пользователь вводит болыше 
символов, чем установлено’ атрибутом edit_limit, и при этом 
необходимо усечь строку, добавляется пустой символ. 

Allow_accept: Возможные значения: true или false (по умолчанию - false). 
_ Если значение равно true и пользователь нажал клавишу 
выполнения (обычно клавиша “КЕТОКМ”, клавиша по 
умолчанию (если есть) становится “нажатой”. (Krasner 
по умолчанию считается клавиша, атрибут is default которой 
установлен B true. 


> Tun поля 


Клавиша изображения - image_button: Поле с нарисованным графичес- 
ким изображением. Когда пользователь выбирает клавишу 
изображения, программа получает координаты точки, в кото- 
рой произошел выбор. Это может быть полезно, если нарисо- 
ван’ небольшой рисунок и выбор разных его областей имеет’ 
разное значение. | ВАЛ 


Атрибуты 
Color: Leger фона рисунка, определенный как номер цвета Автокада 

или одно из символьных имен (по умолчанию - 7): 
dialog_line - текущий цвет диалогового окна; 
dialog_forground - текущий цвет символов диалогового окна 
(лля текста); | 

dialog_background - текущий цвет фона’ диалогового окна; 
graphic_background - текущий цвет фона графического экрана 
Автокада (обычно аналог 0); 

black - цвет Автокада (черный) на черном фоне изображается 
как белый; 

red- цвет Amoral (красный); 

yellow - цвет Автокада 2 (желтый); 

green - цвет Автокала 3 (зеленый); 

суап - цвет Автокала 4 (голубой); 

blue - ивет Автокада 5 (синий); 
‘ magenta - ивет Автокада 6 (фиолетовый); 

white - цвет Автокада 7 (белый); 

graphic_forground на белом фоне изображается как черный. 

АНо\_ассер{: Возможные значения: true или false (по умолчанию - false). 

Если значение равно true и 'пользователь нажал клавишу вы- 
полнения (обычно клавиша “RETURN”), клавиша по умолча- 
нию (если есть) становится “нажатой”. (Клавишей по умолча- 
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нию считается клавиша, атрибут is default которой установлен 
в true. 


АсресЁ гайо: Отношение ширины изображения к его высоте (ширина, 


деленная на высоту). Если значение равно нулю (0:0), то поле 


_ подгоняется под размеры, изображения. Возможно значение 


с плавающей точкой (значения по умолчанию нет). 

Полю изображения необходимо. присвоить точные 
значения ‘атрибутов Width u height или один из этих атрибутов 
плюс значение acpect_ratio. 


> _ Тип поля 


Поле списка - 1$ Бох Поле, содержащее рялы текстовых строк. Нали- 


чие такого поля даст возможность пользователю выбрать необ- 


хОлИМыЙ пункт из списка. Обычно список имеет переменную 


длину, но поля списков могут использоваться и для списков 
фиксированной длины. При выборе строки списка она под- 
свечивается. Поле списка может содержать строк больше. чем 
вмещает поле; в этом случае справа от списка поля появляется 
скользащая шкала (она включена только тогда, когда список 
имеет больше пунктов, чем можно ввести за один раз). Пере- 
мещая визир скользящей шкалы или указывая на стрелки, 
можно просмотреть весь список. В зависимости от приложе- 
ния пользователь может выбрать несколько строк списка. 


Атрибуты 


Label: 


Текст, выводимый над полем списка. Значение. - строка, 
заключенная в кавычки (значения по умолчанию - нет). 


Maltiple_select: Возможные значения true или false (по умолчанию - 


List: 


Tabs: 
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false). Если true, в поле списка можно. выбрать (и подсветить 
несколько пунктов. Еслиа5е, в поле списка может быть — 
выбран только один пункт, а выбор другого пункта отменит 
выбор предыдущего. 

Определяет начальный выбор строк, ' размещенных в поле 
списка. Строки разлеляются символом новой строки (\п). 
Символ табуляции (\t) может присутствовать в каждой строке. 
Значение - строка, заключенная в хавычки (значения по 
умолчанию нет). 

Значение - строка, заключенная В кавычки, содержащая целые 
числа или числа с плавающей точкой, разделенные пробелами 
(значения по умолчанию нет). Каждое число - это. величина, 
которая определяет расположение табуляций в единицах шири- 
ны символа. Эти значения используются для. вертикального 


выравнивания колонок текста в поле списка (см. диалоговое 


окно управления слоями Автокада, acad_mylayer в файле 
аса4.4с!). | | 
Уаше: — Значение + строка, заключенная в кавычки, может содержать 
нуль (“0”) или целые числа, разделенные пробелами (значения 
по умолчанию нет). Каждое целое (начиная с нуля) представ- 
ляет первоначально выбранный пункт списка. Если значение 
атрибута пиир!е_зеест равно false, атрибут value не может 
содержать более одного’ числа. | 
Если строка пуста (* ”), первоначально не будет выбран. 
ни один пункт. В этом случае этот атрибут можно ‘вообще 
не определять. | | 
_ Allow_accept: Возможные значения: true или false (по умолчанию - false). 
Если значение равно true и пользователь нажал клавишу 
выполнения (обычно клавиша “Return”), клавиша по умолча- 
нию ‘становится “нажатой”. (Клавишей по умолчанию счита- 
стся клавиша, атрибут is_default которой установлен в име. 


> Tun поля 


Раскрывающийся список - popup_box Раскрывающийся список эквива- 
лентен полю списка. Когда диалоговое окно появляется Mep- 
вый раз, раскрываюшийся список находится в закрытом CO- 
стоянии и на экране он выглядит’ скорее как клавиша с Ha- 
правленной вниз стрелкой справа. При выборе налийси или 
стрелки список раскрывается и позволяет выбрать необходи- 
мый пункт в пределах окна. Раскрытый список, как правило, 
отображается полностью, в противном случае он будет иметь 
скользящую шкалу справа, которая функционально аналогична 

$ скользящей шкале поля списка. Когда раскрывающийся CMH- 
сок закрыт, текущий выбор появляется в его видимой области. 
Раскрывающиеся списки не допускают выбора нескольких эле- 
ментов одновременно. 


Атрибуты‘. 

Label: Значение - строка; заключенная в кавычки (значения по 
умолчанию нет). Это текст; выводимый слева от раскрываю- 
щегося списка. Если значение атрибута label определено. оно 
выравнивается ‘влево в пределах поля popup_list. 

Edit_width: Возможные значения: целое или вещественное число. 
Ширина части списка в единицах ширины символа, ширина 
рамки, описывающей единственный пункт, когда раскрываю- 
щийся список закрыт. Список не включает необязательную 
метку слева и стрелку (или скользяшую шкалу) справа. Если 
атрибут не указан`или установлен в нуль’и ширина поля не за- 
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Value: 


List: 


Tabs: 


дана, рамка расширяется настолько, насколько это возможно. 
Если значение атрибута не равно нулю, рамка выравнивается 
вправо внутри занятого полем пространства. Если. необходимо 
вытянуть поле, можно при компоновке вставить пробелы меж- 
ду атрибутом и редактируемой частью поля средствами РОВ. 
Значение - строка, заключенная в кавычки, содержашая целое 
число (по умолчанию 0). Целое число, (начиная с нуля) пред- 
ставляет текущий выбранный пункт в списке (пункт, | который 
выводится на экран при закрытом. списке). 

Определяет начальный выбор строк, размещенных в поле 
списка. Строки разделяются символом. новой строки (\п). 
Символ табуляции (\t) может присутствовать в каждой строке. 
Значение - строка, заключенная в кавычки (значения по 
умолчанию нет). 

Значение - строка, заключенная в кавычки, содержащая целые 
числа или числа с плавающей точкой, разделенные пробелами 
(значения по умолчанию нет). Каждое число - это величина, 
которая определяет расположение табуляций в единицах шири- 
ны символа. Эти значения используются для вертикального 
выравнивания колонок текста в раскрывающемся списке. 


> Tun поля 


Кнопка выбора - radio_button Одна или группа кнопок, объединенных 


B колонку. или ряд выбора. Кнопки выбора функционально 


эквивалентны кнопкам радиопанелей: можно выбрать одну 
кнопку, H, пока она будет в нажатом состоянии, любая другая 
кнопка в колонке (ряду) будет отключена. Справа от кнопки 
выбора может появиться необязательная метка (label). Кнопки 
выбора появляются только в колонках, или рядах выбора. Если 
кнопка выбора размещена вне колонки или ряда выбора, 
сообщается об ошибке. 


Атрибуты. 


Label: 


Value: 
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Это текст, выводимый слева от клавиши выбора. Значение. - 
строка, заключенная в кавычки (значения по умолчанию нст). 
Заключенная в кавычки строка (значения по умолчанию нст). 


Если значение атрибута единица, кнопка выбора включена, 
‚если нулю - кнопка выбора отключена, все другие значения 


аналогичны нулю. 

Если по каким-то причинам несколько кнопок имеют ат- 
рибут value, равный единице, будет включена только последняя 
из них. (Эта ситуация может иметь место только в пользова- 
тельских ОСГ-файлах. Как только диалоговое окно появилось 


на экране, средства PDB управляют кнопками выбора 
и добиваются, чтобы могла быть включена только одна кнопка 
в группе одновременно.) 


> Tuan поля. 


$. 


Скользящая шкала - slider Подразумевает получение численного 


значения. Пользователь может перемещать визир. скользящей 
шкалы влево или вправо (или вверх и вниз) для получения 
величины, назначение которой зависит от приложения. Эта 
величина возвращается как строка, содержащая целое число 
определенной точности со знаком. В приложении это значение 
можно масштабировать. 


Атрибуты 
Мт_уаме и Мах_уаме Значение - целые числа, определяющие 


диапазон возвращасмых скользящей шкалой значений. 
Минимальное значение по умолчанию, шш_уаше - 0. 
Максимальное значение по умолчанию тах_уаме - 10000. 
Диапазон должен быть определен знаковым 16-битовым 
целым, т. €. от -32768 до 32767. 

_ Значение атрибута min_value может быть больше, чем 
значение max_valuc. На некоторых платформах это изменяет 
как последовательность появления на экране этих значений, 
так и последовательность их возврата скользящей шкалой во 
время перемещения визира. . ü 


Small_increment и þig_increment Значение - целые числа, определяющие 


Layout: 


Value: 


значения, используемые при управлении приращением 
значения скользящей шкалы. Значение‘ по умолчанию для 
атрибута big_mcrement - одна десятая полного диапазона, 
значение по умолчанию для та лиастетети - сотая от полного 
диапазона. Значения должны быть в диапазоне, определяемом 
атрибутами min_value и шах_уаше. Эти атрибуты не 
обязательны. 

Скользящая шкала может быть ‘ориентирована горизонтально 
или вертикально (по умолчанию - горизонтально). Для гори- 
зонтальных шкал значение увеличивается слева направо, для 
вертикальных - снизу вверх. 

Значение - строка, заключенная в кавычки и содержашая 
текущее (целое) значение скользящей шкалы (по умолчанию - 
min_value). 
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> Tun nona 


Переключатель - tuggle 


Переключатель оперирует двоичными величинами (“0” или 
“1”). Он изображается небольшим прямоугольником с необя- 
зательной меткой (label) справа. Метка X появляется или HC- 
чезает в прямоугольнике при указании переключателя. Пере- 
ключатель позволяет пользователю ) видеть и изменять CrO — 
состояние “включен_выключен” 


| Атрибуты 
Label: ‘Текст, выводимый слева от кнопки переключателя. 

Значение - строка, заключенная в кавычки. 

Value: — Определяет первоначальное состояние переключателя. 

| Значение - строка, заключенная в кавычки и содержащая 

целое число (по умолчанию - нуль). Если значение равно 
нулю, кнопка переключателя пуста (не помечена). Если 
значение равно единице, кнопка выводится с меткой Х. 


`'Предварительно.определенные активные группы полей 


Поля можно группировать в объединенные ряды или колонки. 
Сгруппированные ряды и колонки при формировании общего диалого- 
вого окна рассматриваются как единое поле и могут быть заключены 
3 рамку и иметь необязательную метку (группа без рамки не может 
иметь метки). Однако при выборе группа не может иметь присвоенное 
‚ей действие (кроме ряда или колонки выбора) и Представляет собой 
просто удобный способ раскладки полей в диалоговом окне. Ряд или 
колонку можно определить для внешнего использования как элемент 
диалогового окна. Группы, ‘используемые подобным образом, называют- 
ся объединениями, так как они могут содержать другие поля (детей). 
Нельзя изменять атрибуты объединения, если оно используется как. 
ссылка в диалоговом окне. В файле Ъазе.4с1 определено несколько стан- 
дартных объединений. 


> Tun поля 


Колонка - column Колонка или любой вид поля (кроме кнопки выбора), 
включая ряды и другие колонки. Все элементы колонки распо- 
лагаются вертикально в порядке расположения в ОС -файле. 


Атрибуты 


Колонка без рамки не имеет дополнительных атрибутов, кроме 
стандартных атрибутов компоновки. 


84 


> Tan nona 


Колонка в рамке - boxed-column Колонка, имеющая нарисованную . 
вокруг нее рамку (границу). Диалоговое окно расположено, как 
и колонка, в рамке. Если у колонки в рамке имеется метка, 
она может появиться выше рамки или быть встроенной в нее. 
Если метка отсутствует или является пробелом (* “), или пусто 
(“”); ‘изображается только рамка. 
Атрибуты 


Label: ° Значение - строка, заключенная в кавычки. (по умолчанию 


““). Атрибут label выводится как поле в верхнем левом углу 
колонки, заключенной в рамку. | 


> Tun поля 


Ряд - row Аналогичен колонке, но его поля расположены горизонтально 
в порядке расположения в ОСЁ-файле. 


Атрибуты 
Ряд без рамки не имеет дополнительных атрибутов. кроме 
стандартных атрибутов компоновки. . 


> Tun nons 


Ряд в рамке - boxed_row Ряд, имеющий нарисованную вокруг него 
рамку (границу). Если у рядав рамке имеется метка, она может 
появиться выше рамки или быть встроенной в нее. Если метка 
отсутствует или является пробелом (* “) или пусто (“°”), 
изображается только рамка. 

‚ Атрибуты 
Label: Значение - строка; заключенная в кавычки (по умолчанию 


“*“). Атрибут label выводится как поле в верхнем ‘левом углу 
ряда, заключенного в рамку. 


} 


> Tun ПОЛЯ 


Колонка выбора - radio_column Колонка, содержащая поля кнопок 
выбора. За один раз можно выбрать только одну из кнопок. 
Это фиксированный набор взаимоисключающих. альтернатив: 
В отличие от обычных колонок колонкам выбора можно 
присвоить действие. . 
Атрибуты ‘_ 


Value: — Значение - строка, заключенная в кавычки, содержащая 
значение ключа (Кеу) выбранной текущей кнопки выбора. 
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> Tun поля 


Колонка выбора в рамке - boxed_radio_column Колонка выбора, имею- 
щая нарисованную вокруг нее рамку (границу). Метка тракту- 
ется аналогично метке колонки в рамке. 


Атрибуты 
Label: — Значение - строка, заключенная в кавычки (по умолчанию 
““). Атрибут label выводится как поле в верхнем левом углу 
колонки, заключенной в рамку. 
Value: = Значение - строка, заключенная в кавычки, содержашая 
значение ключа (Кеу) выбранной текущей кнопки выбора. 


> — Тип поля 


Ряд выбора - radio_row Аналогичен ряду выбора и содержит поля 
кнопок выбора, но при этом за один раз можно выбрать 
только одну кнопку. Рялу выбора можно присвоить действие. 


Атрибуты 
Value: — Значение - строка, заключенная в кавычки, содержащая 
значение ключа (Кеу) выбранной текущей кнопки выбора. 


> — Тип поля 


Ряд выбора в рамке - boxed_radio_row Pat выбора, заключенный в рам- 
ку (границу). Метка трактуется как и метка колонки в рамке. 


Атрибуты 
Label: — Значение - строка, заключенная в кавычки (по умолчанию 
““). Атрибут label выводится как поле в верхнем левом углу 
ряда, заключенного в рамку. 
Value: — Значение - строка, заключенная в кавычки, содержащая 
значение ключа (key) выбранной текущей кнопки выбора. 


Декоративные и информационные поля 


> Tun nona 


Изображение - image Прямоугольник, внутри которого отображается 
i векторное изображение. 


Атрибуты 
Color: — Цвет фона рисунка, определенный как номер ивета Автокада 
или: одно из символьных имен (по умолчанию - 7): 
dialog_line - текущий цвет диалогового окна; 


dialog _forground - текущий цвет СИМВОЛОВ диалоговое окна 
(для текста); 
dialog_background - тскущий цвет фона диалогового окна; 
graphic_background - текущий цвет фона графического экрана 
Автокада (обычно аналог 0); 
black - цвет Автокада (черный) на черном фоне изображается 
как белый; 
red - ивет Автокада l (красный); 
yellow - цвет Автокада 2 (желтый); 
green - ивет Автокада.3 (зеленый); 

cyan - цвет Автокада 4 (голубой); 
blue - цвет Автокада 5 (синий); 
magenta - цвет Автокада 6 (фиолетовый): 
white - цвет Автокада 7 (белый). 
graphic_forground на белом фоне изображается как черный 


Асресё гайо: Отношение ширины изображения к его высоте (ширина, 


деленная на высоту). Если значение равно нулю (0.0), то поле. 
полгоняется под размеры изображения. Возможно значение 
с плавающей точкой (значения по умолчанию нет). 

Полю изображения необходимо присвоить точные 
значения атрибутов Width и height или один из этих атрибутов 
плюс значение acpect_ratio. 


> Tun поля 


Надпись - text Текстовая строка, используемая для вывода заголовка 


поля и диалогового окна или с информационной целью. 


Атрибуты 


Label: 


Value: 


Отображаемый на экране текст. Значение - строка, заключен- 
ная в кавычки (значения по умолчанию нет). При компоновке 
поля надписи его ширина больше значения атрибута width, 
определенного в ОС -файле, или ширины, определяемой 
атрибутом label, если он задан. Если ни один из них не задан, 
выдается сообщение об ошибке. 

Как и label, определяет строку, выводимую в поле надписи, но 
не влияет на компоновку полей. Если сообщение является 
неизменяемым, следует определить атрибут label и не 
определять Width и value. В противном случае определяется 
атрибут value и присвоить атрибуту width присваивается 
достаточно большое значение. После вывода диалогового окна 
на экран нельзя изменить размер его полей; если при выводе 
функции $е1_Ше надписи присвоено более длинное значение, 
чем ширина окна, надпись будет усечена. 
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1$ 6019: Возможные значения: true или false (по умолчанию - false). 
Если име, надпись выводится полужирным. шрифтом. 


> Тип. поля 


Разделитель - зразег Пустое поле. Используется только в целях 
компоновки M влияет на размер и расположение смежных 
полей. | i 


Атрибуты 
Нет. 


_ В этих таблицах показаны поля, используемые‘ в диалоговых окнах 
вместе с их атрибутами. Атрибуты полей определяют их размещение 
и функциональность. Атрибут похож на переменную языка программи- 
рования. Он состоит из имени и значения. Значения атрибутов могут 
ÕbITÞb: | nt 

è пелыми - это численная величина. (целая или вещественная), KOTO- 
рая представляет собой размер в единицах ширины или высоты 
CHMBOJIOB; 

» вещественными. - это численная величина, в которой наличие HCE- 
значашего нуля в целой части обязательно; 

è строковыми - это строка текста, заключенная в кавычки (“ ^). Если 
строка содержит символ кавычки, перед ним. следует поставить OÔ- 
ратную косую черту: \”. Строка может содержать другие Е$С-по- 
следовательности: 


\” i=- кавычку; 

\\ - обратную косую черту; 

\п - новую строку; 

\‹ — - горизонтальную табуляцию; 


® зарезервированными словами’- это идентификатор, состоящий из 
текстовых символов и начинающийся с буквы (например, true или 
false - зарезервированные слова, требуемые во многих. атрибутах). 

Зарезервированное слово, чувствительно к регистру: True не равно 

иле. Имена атрибутов также чувствительны к регистру. 

Приложения всегда получают атрибут в виде строки, поэтому, если 
приложением используются численные величины, они должны быть 
преобразованы из строкового представления. 

Некоторые атрибуты едины для всех полей. Определение атрибутов 
необязательно; многие атрибуты имеют значения по умолчанию. Они 
используются при неопределенном атрибуте. Другие атрибуты специ- 
ально предназначены для определенного типа полей (например, цвет 
фона изображения). Попытка присвоить Такой атрибут другим полям 
приведет к сообщению об ошибке. 


Можно .определить собственные атрибуты с именами, не конфлик- 
тующими ни с одним из стандартных имен атрибутов. Имя атрибута, 
как и ключевое слово, может содержать буквы, цифры или символ 
подчеркивания (_). Первым символом должна быть буква. 

Значения определенных пользователем атрибутов должны соответ- 
ствовать типам атрибутов полей. 


Предопределенные атрибуты 


Здесь описаны определенные РОВ атрибуты в алфавитном порядке. 


Имя атрибута 


action 


alignment 


allow_accept 


acpect_ratio 
' big_increment 


children_alignment 


children_fixėd_heigth 


children_fixed_width 
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Поля 
Все активные поля 


Все 


Текстовое поле, 
клавиша изображения 
и поле списка 


Изображение, клавиша 


` изображения 


Скользящая шкала 


Рял, колонка, ряд выбо- 
ра. рял в рамке, колон- 
ка в рамке, ряд выбора 


_ в рамке и колонка 


выбора в рамке 


Ряд, колонка, ряд 
выбора, ряд в рамке, 
колонка в рамке, рял 
выбора в рамке ‘и 
колонка выбора в рамке 


Ряд, колонка, ряд 
выбора, ряд в рамке, 
колонка в рамке, ряд 
выбора в рамке и 


колонка выбора в рамке . 


Назначение 
(если определено или true) 


Активное выражение 
Автолиспа 


Горизонтальное ИЛИ 
вертикальное 
положение в группе 


Активизирует клавишу 
is_default, когда это 
поле выбрано 
Коэффициент | 
коррекции изображения 
Наибольший шаг 
перемещения 


Выравнивание 
элемента, подчи- 
ненного группе 


Высота элемента, 
подчиненного группе. 
Не растет при | 


_ компоновке 


Ширина элемента, 
подчиненного группе. 
Не растет при 
компоновке. 
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color. 


edit_limit 


edit_width 
fixed_heigth 
fixed_width 


heigth 


initial_focus 
is_bold 


is_cansel 
is_default 


is_enabled 


is_tab_stop 


key - 


label 
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. Изображение, клавиша 


изображения 


Текстовое поле 


Текстовое поле, раскры-. 


вающийся список 
Все 


Все 


Все 
Элемент диалога 


Надпись 


Клавиша 


Клавиша | 


Все активные поля 


Все активные поля 


Все активные поля 


Ряд в рамке, колонка 

в рамке, ряд выбора в 
рамке, колонка выбора 
в рамке, клавиша, при- 
митив диалога, тексто- 
вое поле, поле списка, 
раскрывающийся спи- 
сок, клавиша выбора, 
надпись и переклю- 
чатель 


Цвет фона изображения 


Se 


Максимальное число 
символов, которое мо- 


‚жет ввести пользователь 


Ширина редактируемой 
части поля 

Высота не растет при 
компоновке 


Ширина не растет при 
компоновке 


Высота поля 


Ключ поля с первона- 
чальной подсветкой 


Выводится как 
полужирный текст 


Кнопка активизируется 
при нажатии комбина- 
ции клавиш Ctrl+C. 


Кнопка активизируется 
при нажатии клавиши 
“RETURN” 


Поле является 


‘изначально доступным 


Поле может стать 
активным при нажатии 
клавиши табуляции 


Имя (ключ), использу- 
емое приложением 


Отображаемая метка 
поля 


layout Скользящая шкала Скользящая шкала _ 
вертикальна или 


горизонтальна 
list Поле списка, Начальные значения, 
раскрывающийся отображаемые в списке 
список 
max_value Скользящая шкала Максимальное значение 
скользящей шкалы 
min_value Скользящая шкала Минимальное значение 
скользящей шкалы 
mnemonic Все активные поля Мнемонический символ 
| | для поля 
multiple_select Поле списка Поле списка позволяет 
выбрать несколько 
пунктов 
small_increment Скользящая шкала Малый шаг 
перемещения 
tabs -© Поле списка, Табуляция при 
раскрывающийся отображении списка 
список 
value _ Текст, активные поля, Начальное значение 
(за исключением поля 
клавиш и клавиш 
изображения) 
width | Все ` Ширина поля 


Структура ОС/-файла 


Помимо' диалоговых окон ОСТ -файлы могут определять прототипы 
или объединения, которые могут включать определения из других DCL- 
файлов. ОСЁ-файл может состоять из следующих трех частей, которые 
могут располагаться в любом порядке (некоторые части могут отсутст- 
вовать): | 

èe ссылки на другие ОСТ -файлы. Содержат директивы по включению; 

è определения прототипов полей, объединения в колонки и рялы. 
Это определения полей, на которые можно ссылаться; 

è определения диалоговых окон. 
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Фойлы base.dcl и. асад. ас! 


В комплект поставки Автокала включены файлы base.dcl и acad.dcl. 
Они могут быть использованы в качестве примера при создании DCL- 
файлов. | 

Файл base.dcl содержит определения базовых, предварительно опре- 
деленных полей и типов полей. В нем также содержатся определения 
прототипов общего использования. Предварительно определенные поля 
не могут быть переопределены средствами РОВ. Не следует модифинци- 
ровать этот файл! Ошибки в файле base.dcl будут прерывать появление 
как стандартных диалоговых окон Автокада, так и диалоговых окон при- 
ложений пользователя. 

Файл acad.dcl содержит определения всех стандартных диалоговых 
окон, используемых стандартной версией Автокада. Можно отредакти- 
ровать этот файл, если необходимо изменить появление стандартных 
диалоговых окон. 


Определенные пользователем ОС! -файлы 


Все определенные пользователем ОСТ -файлы могут автоматически 
ссылаться на поля, определенные в файле Ба$е.4с1. ОСГ-файл также MO- 
жет использовать поля, определенные в другом ОСГ-файле дополни- 
тельно к base.dcl, используя имя другого файла в директиве включения 
(include): Sg Ss | o 


Ба5е.ас| 


11$Г1. АС иг? ас 


@include "и5г1. ас" › 


Здесь файлы usrl.dcl и usr2.dcl независимы друг от друга, а файл 
usr3.dcl использует поля, определенные в файле usrl.dcel. 
Директива включения имеет форму 


@include имя_файла 


где имя_файла - строка, заключенная в кавычки и содержащая полное 
имя другого ОСГ-файла (с расширением dcl). 

Создаваемый ОСГ-файл не может использовать диалоговые окна, 
определенные в файле acad.dcl. Нельзя использовать директиву @include 
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“асад.4с1”, хотя для создания подобных диалоговых окон можно выре- 
зать часть из файла acad.dcl и вставить ее в создаваемый файл. 


Синтаксис языка ОСИ 


Язык DCL используется для определения новых полей и объедине- 
ния существующих полей в диалоговые окна. Новые окна создаются оп- 
ределениями`полей, Если определение появляется вне диалогового окна, 
оно является прототипом (определением поля) или объединением 
(группой с подчиненными элементами), которое можно использовать в 
диалоговых окнах для ссылок. Каждая ссылка на определение наследует 
атрибуты исходного поля. Если ссылка дается на прототип, можно из- 
менять значения наследуемых атрибутов или добавлять новые атрибуты; 
в случае ссылок на объединения атрибуты не могут быть изменены или 
добавлены. | 

Если используется несколько экземпляров полей с несколькими 
общими атрибутами, проще определить прототип, который содержит 
общие атрибуты. Тогда в каждой ссылке на прототип можно изменять 
или добавлять новые атрибуты. Вы избавляетесь от. необходимости Te- 
речислять список всех общих атрибутов при каждой ссылке на поле. 

Так как атрибуты наследуются именно таким образом, то при соз- 
дании диалогового окна проше создать ссылки на поля (особенно ссыл- 
ки на предварительно определенные поля), чем создавать новые поля. 


Определение поля 


Форма определения поля 


name : Цет1 [: item2 : item3 ....] { 
attribute = value; | 


} 


где item - предварительно определенное поле; name - новое поле, KOTO- 
poe наследует атрибуты всех определенных полей item; {} - определения 
атрибутов (добавляют или, если имена атрибутов илентичны, замещают 
наследуемые определения). Если определение имеет множество родите- 
лей, атрибуты имеют приоритет в порядке слева направо. Если более 
чем одно предварительно определенное поле item определяет один и тот 
же атрибут, используется первое из них. 

Если новое определение не содержит подчиненных элементов, оно 
является прототипом и ссылки на него могут изменять или дополнять 
его атрибуты. Если оно является группой (рядом. или колонкой) с под- 
чиненными пунктами или вложенными полями, оно является субобъе- 
динением. 
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Имя name поля или, прототипа может содержать:только буквы, чис- 
ла или символ подчеркивания (_) и должно начинаться с буквы. 


Примеры: 
Внутреннее определение клавиши 


button ; tile { 
fixed_heigth = true; 
is_tab_stop = true; 


} 
Файл base.dcl определяет клавишу по умолчанию defoult_button: 


default_button : button { 
is_defoult = true; 


} 


Поле default_button наследует значения атрибутов Пхеа_ Лехи 
и is_tab_stop поля button. Файл добавляет новый атрибут is_ pelou 
и присваивает CMY значение true. 


Ссылки на поля 


Форма ссылки на поле 


Мате: 
ИЛИ 


: name { 
attribute = value; 


} 


_ В обоих случаях name - имя предварительно определенного поля. 
В первом случае все атрибуты, определенные в name, объединены 
в ссылке. Во втором случае определения атрибутов внутри фигурных 
скобок добавляют или замешают определения, наследуемые из name. 
Так как это ссылка на поле, а не на определение, изменения атрибутов 
относятся только к этому образцу. поля. Вторая форма может ссылаться 
только на прототипы, а не на объединения (группы с подчиненными 
элементами). 


Атрибуты и значения атрибутов 

Внутри фигурных скобок определения поля или ссылки можно оп- 
ределить атрибуты и присвоить им значения, используя форму 
attrubute = value; 


где attribute - ключевое ‚слово; value - значение, присвоенное атрибуту; 
= - знак присваивания, ; - завершение присваивания. 
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Комментарии 


`’Комментариям в ОС! -файлах предшествуют две обратные косые 
черты - //. Все, что ‘появляется между // и концом строки, игнорирует- 
ся. DCL также позволяет использовать комментарии, принятые в языке 
Си. Они имеют форму /*, текст комментария - */. Начальные (/*) и ко- 
нечные (*/) символы могут находиться на разных строках. 


Обработка ошибок в DCL 


` Средства РОВ проверяют ОСГ-файл сразу же после его загрузки. 
Если при этом обнаруживается синтаксическая ошибка, неправильное 
использование атрибутов или другая ошибка (например, ошибка оп- 
ределения атрибута key для активного поля), ОСТ.-файл не загружается 
. и в файл асад.4се выводится ‘список ошибок. Если ОС!-файл прочитан 
успешно, Автокад удаляет файл аса4д.4се. 


3.2. Приемы языка DCL 


Для правильной компоновки полей в диалоговом окне следует: 
èe использовать компоновку по умолчанию и проверить результат: 
в случае возникновения проблем, похожих на описанные в этом 
разделе, или специальных случаев, требующих отладки, перейти 
к следующему шагу; 
© попытаться отрегулировать компоновку (изменить значения по 
о умолчанию на ‘уровне групп); 
® отрегулировать отдельные поля. 


Управление распределением полей в группе 


Пусть определен ряд из трех полей, расположенных влоль другого 
поля сверху: | 


: column { 

:row { 

: compact_tile { 

: compact_tile { 

: compact_tile { | 
у 

: large_tile { 


} 
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Предполагается, что компоненты поля compact_tile имеют атрибут 
Пхеа м Аш и что поле large_tile шире, чем минимальное пространство, 
необходимое для расположенного выше ряда ‘полей Compa tile. 
По умолчанию эта группа выглядит следующим образом: 


AERE 


3 


Горизонтальное выравнивание по умолчанию 


Левая граница правого поля compact_tile выравнивается по левой 
границе поля large_tile, а правая граница последнего поля; сотрас(_Ше 
ряда выравнивается по правой границе поля large_tile. Поля, располо- 
женные между ними, распределяются равномерно. Аналогично вырав- 
нивается группа колонок. 

Для изменения распре деления по умолчанию следует использовать 
поля spacer 0 и $расег_1, которые отличаются от определенного в файле 
_ Базе.ас поля tspaçar. 


Точка вставки наполнения [spaser_0) 


Поле зрасег_0 в нормальном ‘состоянии не имеет ширины. Оно 
указывает точку вставки разделителя в группе полей, если группу необ- 
ходимо растянуть при компоновке. Если группе полей $расег_0 присвое- 
на положительная ширина, то они все будут занимать равную долю 
пространства. | 


ыы поля зразег_ о 


ЧЕН 


Распределение, измененное вставкой наполнения 


Единичное наполнение (роасег_1) 


Поле зрасег_1 имеет ширину и высоту, равные единице. Поле nc- 
пользуется как наименьший разделитель. 
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Пример: 


Распределение по умолчанию. Положение поля зрасег_1 


ЗЕ БЕ КА 


Распределение, измененное вставкой единичного наполнения 


Нежелательный промежуток между полями 
в прореженных группах | | 


Если смежные колонки существенно различаются по размерам, 
занимаемым полями; поля меньшего размера в группе будут распреде- 


лены слишком редко. . 


Пример: 


ен 


Поля, распределенные слишком редко 


В данном случае колонка будет выглядеть лучше, если присвоить 
атрибуту fixed_heigth значение true: 


EE 
Mang 


Скорректированное прореженное распределение 
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= 


‚ Нежелательный промежуток справа 
и внизу диалогового окна 


Иногда в диалоговых окнах имеется неиспользованное пространст- 
во вдоль правой стороны. Это может быть вызвано полями text, у KOTO- 
рых выводимое значение меньше, чем значение атрибута width. 


Пример: | | 
Фрагмент диалогового окна режимов создания примитивов 
Автокала; 


: text { 

key = “| {ех{”; 
width = 18; 
fixed_width = true; 


} 


B поле text не отображается ничего (атрибут value не установлен). 
Приложение может вывести надпись в поле text, используя функцию 
(set_tile “| 4еж” “По слою”) 

Так как ширина надписи “По слою” меньше 18 символов, вдоль 
° правой стороны диалогового окна появится пустое пространство. Для 
того, чтобы ограничить поле text, его можно вставить в ряд в рамке. 
Иногда для этого может потребоваться перестановка полей в диалоговом 
окне. св. 

Аналогичная ситуация возникает при использовании поля errtile, 
отображающем сообщение об ошибке: если сообщение об ошибке не 
‘выведено, поле выглядит как дополнительное пространство внизу диа- 
логового окна. В этом случае для вертикального выравнивания рекомен- 
дуется вставить дополнительное поле. Spacer в верхнюю часть диалогово- 
го окна. 


`’Пространство вокруг ряда или колонки в рамке 


Если атрибут label ряда или колонки в рамке является пробелом 
(^^) или не задан (“”), рамка группы создается, но не содержит текста. 
Единственный пробел не прерывает рамку. Следует иметь в виду: 

èe CCIH метка является единственным пробелом, то сжимается Mpo- 
странство по вертикали, которое может занимать метка внутри 
рамки, но не сжимается пространство по вертикали, которое мет- 
ка может занимать над рамкой; 

èe ссли метка - пустая строка, сжимается пространство по вертикали 
как внутри рамки, так и вне ее. 
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Группы текста 


Поле текста обычно ‚окружено свободным. пространством, как 
и любой другой тип поля. При сочетании частей текста может возник- 
нуть проблема, например, при выводе сообщения 


Текущее время 0800 ч. 37 с. 


где значения 0800 и 37 заполняются пользовательским приложением. 
Чтобы исключить нежелательные свободные промежутки, используются 
соединенные ‘надписи, построенные из ‘полей text_part. При создании 
‘абзаца можно располагать текстовые части (надписи) вертикально и та- 
ким образом избежать слишком больших промежутков между строками. 
Описанные в этом разделе поля text_part, concatenation и paragraf, 
являются полями-прототипами, определенными в файле base.dcl. 


Текстовые части [1ех!_ рог!) 


Текстовая часть - поле надписи, используемое как часть большого 
куска текста. Граница поля text_part подавляется так, чтобы сочетаться 
с другими частями цех рай в соединении или в поле абзаца. 


Соединение (concatenation) 


Сосдинение - строка налписи, созданная из множества соединен- 
ных полей text_part. Это может быть полезно при вставке в стандартное 
сообщение какого-нибуль текста, который может изменяться во время 
выполнения. Граница вокруг. соединения представляется как единое 
целое. 


Абзац (рагадгай 


Групиа полей’ {1х рай или concatenation, расположенных верти- 
кально относительно друг друга. Это позволяет строить абзацы текста 
как до выполнения, так и во время выполнения. Граница вокруг абзаца 
представляется как единое целое. 


Клавиши выхода из диалогового окна 


Файл base.dcl обеспечивает. несколько объединений стандартных 
клавиш для выхода из диалогового окна или его удаления. Эти стандарт- 
ные объединения следует’ использовать для сохранения единообразия 
вида диалоговых окон среди различных приложений. Кроме того, в Bep- 
сии файла base.dcl эти клавиши определены для каждой платформы 
с учетом ее особенностей, так что использование этих определений 
гарантирует совместимость с каждой платформой. 
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_ Единственная клавиша Да [ОК] - ok_only 


| Клавиша Да (ОК) аналогична клавише в окне предупреждений. 
Ключ key клавиши Да имеет значение “accept”. 


Да (ОЕ и Отмена (сапсе] - ok_cancel 


Комбинация клавиш Да и Отмена (ОК and Cancel) - стандартная. 
комбинация для диалоговых окон, в которых могут вноситься измене- 
ния в данные. Ключ key клавиши Отмена (Cancel) имеет значение 
“cancel”. 


Да (ОЕ), Отмена (Cancel) и Помощь {Help} - ok_cancel_help 


Группа оК_сапсе] скомбинирована со стандартной клавишей 
Помошь (Help). Ключ key клавиши Помощь имеет значение “Пер”. 


Да (Ok), Отмена (Cancel), Помощь (Help) 
и Информация (Info) - ok_cancel_help_info 


Все описанные выше клавиши плюс информационная клавиша для 
вывода дополнительной информации, которая может отображать имя 
приложения, товарный знак, номер версии, информацию о получении 
технического сопровожления и т. д. Ключ Кеу клавиши Инфо... имеет 
значение “info™. 


Изменение надписи клавиши выхода 


Иногда может возникнуть необходимость изменить надпись KJA- 
виш выхода, например лля создания диалогового окна, которое может 
удалить данные, используя. клавишу Удаление вместо клавиши Да. Для 
этого следует использовать прототип retirement_button:; 


destroy_button : retirement_button { 
label = “Удаление”; 
кеу = “destroy”; 
mnemonic = “у”; 


} 


Носле определения измененной клавиши выхода следует встроить 
ее в объединение, которое соответствует по виду и действию стандарт- 
ным группам, описанным в предыдущем разяеле: Например, здесь оп- 
ределено поле ok cancel, _help: 


| ок _сапсе!_пер : column { 
: row { 
fixed_width = true; 
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alignment =centered; 
ok_button: 

: spacsr {width =2;} 
cancel_button: 

: spacer {width =2;} 
help_button; 


} 


Описание нового объединения с замещенной клавишей Ook_button 
на новую: 


} 

В стандартном объединении клавиша Да предлагается по умолча- 
нию, но атрибут is_default не добавляется к описанию destroy_ button. 
B подобных ситуациях, если диалоговое окно выполняет действия по 
удалению, следует сделать клавишу Отмена клавишей по умолчанию. 


В этом случае она действует и как клавиша по умолчанию, и как клави- 
a отмены опасной операции: 


дезгоу_ сапсе!_пер : column ( 
row { 

fixed_width = true; 

alignment = centered; 
destroy_button : 

: spacer {width = 2:} 

: cancel_button {is_default = true;} 
spacer {width = 2;} 

help_button; 


} 


Перед cancel_button ставится двоеточие. Поскольку атрибут изме- 
HEH, следует использовать исходное описание клавиши Отмена как про- 
тотип. Если клавиша отмены и клавиша по умолчанию совпадают (обе 
‘имеют атрибуты is_default и 1$_сапсе|, установленные, в име, как в этом 
примере) и не присвоено действие с вызовом функции done_dialog лю- 
бой другой клавише, то ни одна клавиша не сможет закрыть диалоговое 
окно, и его`действие всегда будет отменяться. 


Поле ошибки - errtile 


Поле надписи, которое, как правило, появляется внизу диалогового 
окна. По умолчанию оно пусто, но приложение может отобразить в нем 
сообщение, присвоив значение полю с ключом “error”. 
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Да (Ok), Отмена (Cancel), Помощь (Help) 
и поле ошибки - ok_cancel_help_errtile 


Объединение, определенное в файле base.dcl, является колонкой, 
в которой клавиши выхода ok_cancel_help располагаются над стандарт- 
ным полем errtile. Этим достигается удобное определение одновременно 
клавиш выхода и поля ошибки. 


3.3. Управление диалоговыми окнами 


Описание диалогового’ окна на языке DCL является статической 
картиной формы окна. Все действия во время диалога и после закрытия 
окна определяются управляющей программой вызова диалогового окна 
и обработки результатов диалога. В данном пособии мы рассматриваем 
управление диалоговыми окнами только через Автолисп. Сначала 
опишем применяемые для этого функции Автолиспа, затем посмотрим, 
как их использовать в управляющих программах. Такие управляющие 
программы могут содержать не только строки управления диалогом, 
но и выполнять определенные прикладные залачи пользователя. Однако 
более целесообразно функции управления диалоговыми окнами 
оформлять в виде ‘отдельных подпрограмм, вызываемых из прикладной 
залачи. В этом случае облегчается режим отладки диалога и появляется 
возможность использования таких функций в других прикладных 
программах. 


и 


3.4. Функции Автолиспа для диалоговых окон 


Эти функции обращаются к соответствующему ОСГ-файлу при 
отображении диалогового окна на экране. 


Открытие и закрытие ОС!-файлов 
(юад-Фаюд имя-файла) 


Загружает указанный ОСГ-файл. Возвращает целое значение. 
(dck id), используемое в последующих вызовах функций new_dialog 
и unload_dialog. В имя файла не следует вставлять расширение. 


(unload-dialog del_id) 
Выгружаст указаныый ОСГ._файл. Всегда возвращает nil. 
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Открытие и закрытие диалоговых окон 


(new_dialog имя-окна del_id [действие] точка]) 


Начинает управление диалоговым окном, выводит его Ha 3KpaH и 
может определить действие по умолчанию. Аргумент имя-окна является 
строкой и определяет диалоговое. окно, а аргумент 4114 определяет 
ОСГ-файл (это значение определяется вызовом функции load dialog). 
Приложение должно вызывать функцию new_dialog перед вызовом 
start_dialog. Все установки, такие, как присвоение полям значений, соз- 
дание изображений или списков для полей списка и связывание дейст- 
вий с полями (через вызовы функции асиоп_Ше), должны происходить 
после вызова функции new_dialog и перед вызовом start_dialog. Действие 
по умолчанию выполняется после указания пользователем активного 
поля, которое не имеет присвоенного функцией action_tile или опреде- 
ленного в ОС[.-файле действия или функции вызова с. возвратом. При 
успешном завершении функции (new dialog) возвращает t, в противном 
случае - nil. Аргумент действие, который должет быть залан, если опре- 
делен аргумент точка, является строкой, содержащей выражение Авто- 
лиспа для использования как действия по умолчанию. Если ‘аргумент, 
действие определять не нужно, следует присвоить ему пустую строку 
(^ ”). Если присутствует аргумент точка, то он является списком (X Y) 
точки расположения диалогового окна на экране. Точка обычно опреде- 
ляет положение левого верхнего угла диалогового окна. Поэтому не сле- 
дует определять положение диалогового окна при его первой инициали- 
зации. Координаты положения окна следует задавать после вызова 
функции (допе_41а102) для повторного открытия окна. Это позволяет OT- 
крывать окна заново, где они были закрыты. Если точка определена как 
`(-1-1), дИалоговое окно откроется в положении по умолчанию (в цен- 
тре графического экрана 'Автокала). *” 

Всегда слелуст проверять возвращаемое функцией new_dialog 
значение. Вызов функции start_dialog, если функция new_dialog вернула 
значение ошибки, может привести к непредсказуемым последствиям. 


(start_dialog) 


Начинает диалог в диалоговом окне. Диалоговое окно должно быть 
предварительно инициализировано предшествующим вызовом функции 
new_dialog. Оно остается активным, пока выражение действия или 
функция вызова с возвратом не вызовут функцию done_diflog; обычно 
вызов done_dialog связан < полем, имеющим‘ ключ “accept” (обычно 
клавиша “Да” (“ОК”)). или ”Сапсег” (обычно клавиша “Отмена” 
(“Cancet”)). 

° Функция (start_dialog) не имеет аргументов. Она возвращает аргу- 
мент состояние, переданный в функцию (done_dialog). Значением по 
умолчанию является l, если пользователь указал клавишу Да; 0, если 
пользователь указал клавишу “Отмена”; -1, если окна были закрыты вы- 
зовом функции (еппт_ 412102). Но если функция (done_dialog) установила 
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состояние в значение большее 1, функция (start_dialog) вернет значение, 
смысл которого определяется приложением. 


(done_dialog [состояние]) 


Завершает диалог в диалоговом окне и убирает его с экрана. Функ- 
ция должна вызываться из выражения действия или’из функции вызова 
с возвратом. Эта функция также возвращает текущее положение (X Y) 
диалогового окна. Если функция с возвратом определена для клавиш 
с ключом “accept” или “done”, функция вызова с возвратом должна 
определенно вызывать функцию dòne_dialog. Если этого не сделать, 
пользователь может не выйти из диалогового окна. Если с этими клави- 
шами не связана функция вызова с возвратом и используются стандарт- 
ные клавиши выхода, Автокад обрабатывает их автоматически. Кроме 
того, точное действие Автолиспа лля клавиши “accept” должно опреде- 
лить действие как l (ияи как определенное приложением значение), 
иначе ‘функция (start_dialog) вернет значение по умолчанию 0, что 
аналогично отмене диалогового окна. 

Аргумент состояние не является обязательным. Если он определен, 
то должен быть положительным целым; который функция (start_dialog) 
возврашает как | для Да и как 0 для Отмена. Функция (done_dialog) 
возвращает список координат точки (X У), определяющей положение 
диалогового окна, которое покинул пользователь. Этот список можно 
использовать в последующем вызове функции (пе\м. dialog) для повтор- 
ного открытия диалогового окна в месте, выбранном пользователем. 


(term_dialog) 


Завершает диалог во всех активных в настоящий момент диалого- 
вых окнах, как в случае прерывамия пользователем. Если при открытых 
ОСГ-файлах выполнение. приложения прерывается, Автокад автома- 
тически вызывает функцию (term_dialog). Данная функция используется 
в основном для закрытия вложенных диалоговых окон. Функция 
(term_dialog) всегда возвращает nil. 


Инициализация выражений действия 
и функций вызова. с возвратом 


(асбоп_Ше ключ выражение_действия) 


Присваивает действие, которое будет выполняться после выбора 
пользователем определенного поля. Аргумент ключ представляет имя 
поля, которое будет вызывать действие. Действие, присвоенное функии- 
ей асцоп_Ше, замешает действие по умолчанию диалогового окна или 
атрибут поля action, если они определены в ОСТ -файле. 

Аргументы ключ и выражение действия являются строками.“ Аргу- 
мент выражение_действия вычисляется после выбора пользователем: по- 
ля. Выражение может обращаться к текущему значению поля (атрибут 
поля value), определенному как value, к его имени, определенному как 
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$key, к данным, установленным функцией (client_data_tile), определен- 
ным как data, к коду причины вызова, определенному как $геазбоп, 
к координатам изображения, если это поле изображения, определенным 
как $x и $y. 


Обработка полей и атрибутов 


(mode_tile ключ режим) 


Устанавливает режим для данного поля. Аргумент ключ определяет 
поле. Аргумент режим является целым числом, его значения даются 
в таблице: 


Значение Результат 
аргумента 
0 Поле включено (доступно) 
yS Поле отключено (недоступно) 
2 Выбрать поле - 
3 Подсветить содержимое текстового поля 
4 Включить/отключить подсветку изображения 


Для аргумента режим можно определить только одно целое значение, 
Аргумент ключ является строкой. | | 


(get_attr ключ атрибут) 


Запрашивает значение DCL указанного атрибута. Аргумент ключ 
определяет поле, аргумент атрибут - имя атрибута в ОСГ-описаниии 
поля. Значение возвращается как первоначально установленное в описа- 
НИИ ПОЛЯ; OHO Не отражает изменений состояния поля, которые могут 
произойти после ввода пользователя или вызова функции set_tile. 

Функция (get_attr) возвращает значение атрибута как строку. 
Аргументы ключ и атрибут являются строками. 


(get_tile ключ) 


Запраигивает действующее значение указанного поля. 
Аргумент ключ определяет поле. Функция (get_tile) возвращает 3Ha- 
чение поля как строку. Аргумент ключ является строкой. 


(set_tile ключ значение) 


Устанавливает действующее значение для указанного поля. Аргу- 
мент ключ определяет поле, аргумент значение - присваиваемое, значе- 
ние. Все аргументы являются строками. 
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Задание полей списков и раскрывающихся списков 


(start_list ключ [операция] индекс] 


Запускает обработку указанного поля списка или раскрывающегося 
списка, определенного аргументом ключ. Аргумент операция является 
целым№числом со следующими возможными значениями: 


Аргумент Результат 

|. Изменить выбранное содержимое списка j - 

2 Добавить новый пункт в список i 

3 Улалить старый список и создать новый (по умолчанию) 


Аргумент индекс игнорируется, если функция start_dialog не вызы- 
вается с кодом изменения 1, тогда индекс определяет пункт списка для 
изменения последующим вызовом функции add_list. Значения индекс 
начинаются с нуля. Аргументы операция и индекс не обязательны. Если 
' He определен аргумент операция, он по умолчанию устанавливается 
в 3. Если не определена операция и не определен индекс, индекс по 
умолчанию устанавливается в 0. Аргумент ключ является строкой. 


(add_list элемент) 


Добавляет заданную строку в текуший список или замещает пункт 
списка‘на элемент. Аргумент элемент является строкой. Он завершает 
обработку текущего списка. 


(end_list) 


Создание изображений 


(dinx_tile ключ) 
(ту Ше ключ) 


Функции возврашают размеры поля в единицах диалогового окна, 
которые используются функциями уес1ог_пларе, fill_image и slide_image, 
требующими задания абсолютных координат. Аргумент ключ определя- 
ет поле. Координаты возврашаются как максимально разрешенные 
в поле. Так как координаты отсчитываются от нуля, функции возвраща- 
ют значения на единицу меньше, чем размеры по Х- или У-направле- 
нию. Функция dimx_tile возвращает ширину поля, функция dimy_tile - 
его высоту. Для обеих функций аргумент ключ является строкой. ‘ 


(start_image ключ) 


Запускает процесс создания указанного изображения в поле, опре- 
деленном аргументом ключ. Аргумент ключ является строкой. 


(vectorimage x1 y1 x2 y2 цвет) 


Рисует вектор на текущем активном osnan (открытом функ- 
цией start_image) из точки (xl yl) в точку (x2 y2). Параметр цвет опре- 
деляет номер цвета Автокада или один из логических цветов: . 
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Номер цвета Мнемоника ADI Значение 


-2 BGLCOLOR Цвет фона графического экрана 
| Автокада 
-15 DBGCOLOR Цвет фона диалогового окна 
-16. | РЕССОГОКВ Цвет ‚диалогового окна (для текста) 
-18 LINECOLOR — Цвет линии диалогового окна 


‚ Начало (0 0) находится в левом верхнем углу изображения. Можно 
получить координаты правого нижнего угла изображения, вызвав функ- 
цию размеров (dimx_tile). 

(fill_image x1 y1 x2 y2 цвет) | 

Рисует закрашенный прямоугольник на активном изображении. 
Аргументы аналогичны функции vector_imagce. 
(slide_image x1 y1 x2 y2 имя_слайда) 


Отображает слайд Автокада на текущем активном изображении. 
Слайд может быть отдельным слайдом (*. $19) или находиться в составе 
библиотеки слайдов (*.slb). При вызове из бибдиотски сначала указыва- 
ется имя библиотеки, затем в круглых скобках имя слайда. Первый угол 
слайла, его точка вставки, определястся как (xl yl), второй угол - 
(x2 y2). Начало (0 0) находится в левом верхнем углу изображения. 3a- 
вершаст создание тскущего изображения. | 


(епа_итаде) 


Данные, связанные с программным приложением 


(client_data_tile ключ клиент-данные) 


Связывает управляемые приложением данные с полем. определен- 


ным аргументом ключ. Аргумент ключ является строкой. Определенные 


приложением данные задаются аргументом клиент-ланные и также 
являются строкой. Выражение действия может ссылаться на строку, оп- 
ределенную как $data. 


° 3.5. Схема вызовов функций управления 


Рассмотрим пример вызова и управления простого диалогового окна 
hello : dialog { | 


‚ label = “Пример диалогового окна”; 


: text { 


- label = “Всем привет”; 


} 
} 


ок оп: 
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=” 


Данное описание находится в файле’ ВеПо.ас!. Управляющая 
появлением этого окна функция Автолиспа может иметь следующий 
ВИД: | l 


(defun showalert ( / del_id) | i 
(setq dcl_id (Iload_gialog “hello.dcl”)) ;3arpysnti DCL-þaăn 


\ 
\ 


(if (not (new_dialog “hello” del_id)) ‚Инициализировать диалог 
(exit)) (выйти, если не работает) 
(action_tile : ‚Связать выражение действия 
“accept” : ‚с ключом клавиши Да 
“(done_dialog)”) | ‚Закончить диалог, если 
‚нажата клавиша Да 
(start_dialog) ‚Вывести диалоговое окно 
(unload_dialog del_id) ‚Выгрузить ОСЕ-файл 


После вызова функции (start_dialog} диалоговое окно становится | 
активным, пока пользователь не подсветит поле (обычно клавишу), 
которое сзязано с вызовом выражения (done_dialog). Вызов функции 
(аспоп_Ше) устанавливает связь между полем (в этом примере 
с клавишей Да, ключ которой имеет значение “ассерг”) и выражени- 
ем дейетвия. Именно из-за этого вызов функции (4опе_41а10#) появ- 
ляется внутри вызова функции (аспоп_Ше) и перед вызовом функ- 
ции (start_dialog). По сути, все действия до функции (start_dialog) 
являются настроечными. Более сложные окна потребуют большего 
числа настроек и дополнительных операторов между функциями 
(start_dialog) и (ишоаа_ 412102), но последовательность вызовов будет 
такой же. 


Показанный пример демонстрирует обычную последовательность 
вызовов функций: 

1. Загрузка ОСГ-файла функцией (load_dialog). 

2. Вызов функции (new_dialog) для вывода отдельного ‘диалогового 
окна’ на графический экран Автокада. Важно проверять возвращаемое 
функцией (new_dialog) значение. Вызов функции (start_dialog), если 
функция (new_dialog) возвратила ошибку, может привести к непредска- 
зуемым результатам. 

3. Инициализация диалогового окна и установка значений полей, 
‘списков и изображений, если это необходимо. На этом этапе обычно 
вызываются функции (set_tile) и (mode_tile) для установки состояния 
полей и их значений; (start_list), (add_list), (end_list) для полей списков; 
(start_image), (vector_image),  (fill_image), (slide_image), (end_image) для 
изображений. На этом этапе обычно вызывается функция (action_tile) 
для установки выражения действия. Здесь можно вызвать и функцию 
(action_tile) для связи определенных приложением данных с диалоговым 
окном и его компонентами. | | 

4. Вызов функции (start_dialog) передает управление диалоговому 
окну, в которое пользователь может вводить данные. | 
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5. Процесс ввода данных пользователем (вызовы с возвратом). 
На этом этапе используются функции (get_tile), (get_attr), (5е ще), 
(поде_Ше). 

6. Указание пользователем клавиши выхода вызовет функцию 
(done_dialig), которая, в свою очередь, возврашает функции 
(start_dialog). Далее следует выгрузка ОСГ-файла, обеспечиваемая функ- 
цией (unload_dialog). 

Показанную последовательность действий можно ipeittasnTh сле- 
дующей схемой: 


1сад_91а109 


new_dialog 
action_tile 
start_dialo 


“get_tile 
set tile 
done_dialog 


unload_dialog 


На схеме показано одновременное управление только одним 
окном и одним ОСГ-файлом. Управление несколькими окнами 
аналогично: следует размножить средний большой прямоугольник 
нужное число раз: 


load_dialog 


new_dialog 
action_tile 
start_dialog 
get_tile 
set_tile 
done_dialog 


new_dialog 
action_tile 

start_dialog 
get_tile 
set_tile 

done_dialog 


unload_dialog 


Схему можно использовать для загрузки нескольких ОСГ-файлов. 
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Функции, запрещенные во время действия диалогового окна 


При активном диалоговом окне (функция (start_dialog). вызвана) 
нельзя вызывать некоторые функции Автолиспа, которые изменяют 9K- 
ран, который не должен изменяться, пока на нем изображается диало- 
говое окно, или требуют ввода пользователя, не имеющего отношения 
к диалоговому окну. | 

Если необходимо ввести данные в режиме графического экрана 
(например, выбрать точку или примитив), необходимо временно за- 
крыть диалоговое окно, вызвав функцию (done_dialog), - графический 
экран станет доступен. После выполнения выбора производится повтор- 
НЫЙ ВЫЗОВ ОКНА. 

Перечень функций Автокада, запрещенных к вызову при открытом 
диалоговом окне: | | вЫ 

l. Запросы и команды Автокада: (command), (озпар). 

_ 2. Функции ввода пользователем: (getint), (getreal), (getstring), 
(getpoint), (ресогпег), (2619150), (getangle), (getorient), (getkword). 

3. Функции управления экраном: (prompt)!, (menucmd), (redraw), 
(graphscr), (textscr), (textpage). 

_ 4. Графические функции ’низкого уровня: (grclear), (grdraw), 
(рттеаа), (grtext), (2туас$). 

5. Функция набора выбора (ssget)?. 

6. Функции управления примитивами: (епипо@), (entmake), (entdel), 
(entsel), (nentsel), (entupd). 


Выражения действий 


Для определения последствий выбора определенного поля диалого- 
вого окна следует связать выражение Автолиспа с этим полем посредст- 
вом вызова функции (асиоп_Ше). Внутри действия часто бывает необхо- 
димо получить доступ к атрибутам ОСТГ-файла. Это обеспечивают 
функции (get_attr) и (get_tile): функция (get_attr) выдает значения, CO- 
храненные в ПОСГ-файле, а (26 Ше) выдает текущие значения. 
Значения, связанные с выбранным полем, получаются автоматически. 

Выражение действия Автолиспа получает доступ к переменным, ко- 
торые описаны ниже в таблице и описывают выбранное поле и его со- 
стояние во время действия. Имена переменных зарезервированы, и их 
значения можно только считать (они имеют смысл только тогда, когда 
доступны выражению действия). 


! Функции.вывода текста (print) и (рппс) полезно использовать при отладке 
диалоговых окон, но не в окончательной версии. Если диалоговое окно 
перекрывает зону подсказок, эти функции выводят текст поверх диаяогового окна. 

2 Запрещены только интерактивные функции (SsSget). 
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Переменная’ 'Назначение Примечание 

$key Атрибут key выбранного Применима ко всем действиям 
поля | | 

Svalue Строка текущего значения Применима ко всем действиям. 
поля, похожая на строку Если поле является полем спис- 
окна редактирования, или ка (или раскрывающегося спис- 
“0”, или “1” для ка) и не содержит ни одного 
переключателя пункта, переменная $value будет 

rar иметь значение nil 

Sdata Данные, установленные Применима ко всем действиям. 
сразу после вызова Не имеет значения ло тех пор, 
(new_dialog) через вызов пока приложение не установит, 
(client_data_tile) и управ- CrO вызовом. функции 

| ляемые приложением (client_data_tile) 

Згеазой Код причины, сообщаю- Определяет причину действия. 
щий, какой выбор поль- Ее значение определено для 
зователя вызвал действие. любого вида действия, но его 
Используется в полях следует проверять, если дейст- 
edit_box, list_box, вие связано с полями edit_box, 
image_button и slider list_box, image_button и slider 

$x Координата X выбора Представляют координаты X 
image_button. и У точки, в которой пользова- 

S Координата У выбора тель Antpa поле image_button. 
image _button. Для других целей эти перемен- 

ные не имеют значения. Коор- 
дината Х. находится в интерва- 
ле, возврашаемом функцией 
(dimx_tile), координата У - 
в интервале, возвращаемом 
| функцией (dimy_tile). 
Примеры: 


Если текстовое поле определено как editl, выражение действия 
в следующем вызове функции (action_tile) вычисляется после того, как 
пользователь покинет текстовое поле: 


(action_tile “editt” “(setą ns $уаме)”) 


В этот момент Svalue содержит строку, введенную пользователем, 
и’она сохранится в переменной ns. 

В слелующем примере сохраняется имя выбранного поля, и в слу- 
чае необходимости программа может ссылаться на него. 


(action_tile “ед 1” “(setq пеммйе $key)”) 
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Переменная newtile устанавливается в значение атрибута key Bbi- 
бранного поля, т.е. в “ед и1”. Переменная $Кеу часто используется 
внутри функций, которые служат для выполнения действий, присвоен- 
ных нескольким различным полям. 

% 


Вложенные диалоговые окна 


Создавая вложенные диалоговые окна, ими можно управлять с 
помощью функций (new_dialog) и (start_dialog), вызывая их выражение 
действия. Например, функция (showalert) отобразила бы диалоговое 
окно “Всем привет” при выборе пользователем клавиши button_l 
какого-либо нового диалога, если вставить выражение | 


(action_tile “button_1” “(showalert)”). 


Для возврашения в предыдущее окно необходимо покинуть 
текущее. 

Слишком большое число вложений усложняет работу. Автокад. 
ограничивает число вложений восемью. Рекомендуется использовать 
около трех-четырех вложенных окон. 


Временное закрытие диалоговых окон 


При необходимости выхода из диалогового окна для интерактивно- 
го выбора на графическом экране следует временно закрыть диалоговое 
окно и после выполнения действия Ha графическом экране вернуться 
в диалоговое окно с полным его восстановлением. Такая процедура вы- 
полняется с помошью функции (4опе_ 412108) с аргументом status. 

Пример: | 

В программе bmake.lsp используется клавиша Указание точки<, KO- 
торая временно закрывает диалоговое окно для предоставления возмож- 
ности ввода точки на графическом экране. При указании этой клавиши 
происходит закрытие диалогового окна с кодом состояния 4: 


(action_tile “pick_pt” “(done_dialog 4)”) 


После возврата из функции (start_dialog) программа: проверяет возвра- 
щаемый код состояния и при необходимости изменяет координаты точки: 


(setq what_next (start_dialog)) 
(cond ((= what_next 4) 
(progn | 
(setq pick_pt (getpoint “Базовая точка вставки: “)) 
(setq x_pt (Цо$ (саг (pick_pt) 2 4)) 
` (setq y_pt (Цо$ (cadr (pick_pt) 2 4)) 
(setq z_pt (rtos (caddr (pick_pt) 2 4)) 
)) 
) 
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Тело основной функции заключено в цикл с вызовом функции 
(start_dialog) до тех пор, пока пользователь не нажмет на клавишу Да 
или Отмена: 


(defun c:mblock ... 
(while (< 2 what_next) 


(setq what_next auat dialog) 
(cond 


)) 


Если диалог овое окно вложено. процедура усложняется, по сущест- 
BY оставаясь прежней: 


(defun с:тааюд (/what_next what_next1) 
(setq what_next 5) 

(if (< (setą ас а (Ioad_dialog “тата!ю.ас!”)) 0) (exit)) 
(while (< 1 мпа{ пеж) 

(new_dialog “тата” dcel_id) 

(action_tile “x” “(subdlig})”’) 

(cond 

((= what_next1 3) 

(subdlig) . 

(if (/= 3 what_next1) 

(setq what_next (start_dialog)) 


) 
(T (setq what_next (start_dialog)}) 
| ) 
(сопа 
((= 2 what_next) 
(setq хх (getpoint “\пУкажите точку: “)) 
: ира) 
) 


) | 
(defun subdig() | 
(new_dialog “subdig” дс! а) | \ 
(action_tile “hide_all” “(допе_Фаюд 3)”) | 
(setq what_next (start_dialog)) 
(if (= 3 what-nextt) 
(done_dialog 2) 
) 
) 
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Обработка полей 


Как управлять полями при инициализации и в процевсе ведения 
диалога? При изменении значения одного поля со связанными C HHM 
полями должны происходить изменения. 


Инициализация режимов и значений 


При инициализации диалогового окна определенное поле может 
быть первоначально включено или отключено и подсвечено или не под- 
свечено. Эти операции выполняются с помощью вызова функции 
(п104е_Ше). Установить значение поля можно с помощью функции 
(521 Ше). Во время инициализации делаются установки полей. списка 
и создаются изображения. 

Пример: | 

Показанный * набор функций выполняет установку значения 
по умолчанию для текстового поля и подсвечивает его: 

(зеа пате_$г “Коленчатый вал”) 


(set_tile “lastname” name_str) 
(mode_tile “lastname” 2) 


Дополнительный вызов функции (mode_tile) может подсветить CO- 
держимое текстового поля: 


(mode_tile “lastname” 3) 


Перед тем. как отключить подсвеченное поле, необходимо с помо- 
шью вызова функции (mode_tile) подсветить другое поле. Ведь oT- 
ключенное полсвеченное поле бессмысленно, что B некоторых. случаях 
может привести к ошибке. 

Пример “самоотключения” поля - послеловательность “страниц” 
диалоговых окон, которые перелистываются ‘указанием клавиши 

“Следующий” или “Предыдущий”. Когда указывается клавиша “Следу- 
ющий” на предпоследней “странице”, после перехода эта клавиша 
отключастся. То же самое происходит с клавишей “Предыдущий” при 
переходе на первую “страницу”. В обоих случаях использованная кла- 
виша отключается и подсвечивается другое поле. 

Предположим, что переключатель с. именем “вгоир_оп” управляет 
группой “2тоир”: когда переключатель отключен, поля группы недоступ- 
НЫ и не могут быть изменены. В этом случае для переключателя следует 
определить следующее действие: | 


(action_tile “дгоир_оп” “(mode_tile \"дгоир\” (- 1 (atoi Фуаме)))”) 


‘Вычитание и вызов функции (atoi) в выражении действия устанав- 
ливают значение аргумента mode функции (mode_tile). Так как значение 
переключателя равно нулю, когда он отключен, и единице, когда он 
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включен, вычитание изменяет значение аргумента mode на противопо- 
ложное и управляет доступностью группы. 


Установка полей списков и раскрывающихся списков 


При установке значений для поля списка или раскрывающегося 
списка необходимо выполнить следующую последоватсльность опера- 
ций: 


(start_list), (add_list) и (end _list) 


Список можно изменить после его создания. Функция (mapcar) по- 
лезна для перевода списка из Автолиспа в отображаемое поле списка: ' 


(start_list “selections” операция) 
(mapcar 'ʻadd_list newnames) 
(end_list) 


Обработка значений списков 


При обработке списков значение поля 1% Бох может содержать 
начальные пробелы, особенно если выбрано несколько пунктов, так что 
не следует его проверять с помошью функций сравнения строк. Сначала 


следует преобразовать значение к целому, используя функцию (atoi) или 
(read). 


Пример: = 
Предполагается, что список “justone’™ позволяет выбрать только 
один пункт одновременно. Фрагмент кода проверяет, выбран ли`третий 
_ пункт списка. (Поскольку функция (atoi) возвращает 0, если строка пус- 
тая или когда в ней содержится “0”; сначала следует проверить, являет- 
ся ли строка пустой.) | 


© 


(setq index (get_tile “justone”)) i 
(cond 

((/= index “”) | 

(= 2 (atoi пдех)) ; это третий пункт 


) 
) 


Значение раскрывающегося списка никогда не начинается с симво- 
ла пробела, так что преобразование в этом случае выполнять не обяза- 
тельно. Раскрывающисся списки не позволяют выполнять множест- 
венный выбор. Если’в поле списка можно выбрать одновременно 
несколько пунктов, программа должна не только выполнить преобразо- 
вание, но и перебрать все множество значений в строке. 
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Пример: 

Функция (mk_list) возвращает список, содержащий только выбран- 
ные пользователем поля из исходного списка displist. Переменная 
displist определена как глобальная. Предполагается, что функция 
(mk_list) вызывается C текущим значением $value поля списка. 


(defun mk_list (readlist / count item retlist) 

(setq count 1) 

(while (setq item (read readlist)) 

(setq retlist (cons (nth item displist) retlist)) 
(while (and (/= “ “ (substr readlist count 1)) 
(while (and (/= “” (substr. readlist count 1)) 
(/= "“ “ (substr réadlist count 1))) 

(setq count (1+ count)) 


(setq readlist (substr readlist count)) 


) 


(reverse retlist) 


) 


Создание изображений 


Последовательность вызовов для создания поля изображения и KA- 
виши изображения аналогична последовательности обработки списка. 
Функция (start_ image) начинает создание изображения, функция 
(end_image) заканчивает его. Однако определение результата рисования 
осуществляется путем использования нескольких разных Функций, а не 
путем задания разных аргументов: 

e (vector_image) - < рисует вектор (одна прямая линия) на текущем 
изображении. 

(fill_image) - рисует закрашенный прямоугольник. 

e (slide_image) - отображает слайд Автокада. 


Эти функции требуют определения абсолютных координат. Чтобы 
залать их корректно, следует знать размеры поля изображения или кла- 
виши изображения. Так как размеры полей определяются во время их 
компоновки, функции РОВ обеспечивают получение ширины и высоты 
поля: (dimx_tile) и (dimy_tile). Начало поля (0 0) всегда находится 
в верхнем левом углу. 

Примеры: 

Предположим, что нужно закрасить красным цветом поле `‘изобра- 
жения “сиг _со]ог”: 

(setq width (dimx_tile “сиг_союг”) 
height (dimy_tile “сиг_союг”)) 
(stårt_image “cur_color”) 
(fill_image “cur_color”) 
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(fill_image 0 0 width height a 1 - красный цвет Автокада 
(end_image) 


Далее нарисуем вокруг поля границу красного цвета, а не закра- 
шенный прямоугольник (векторы рисуются против часовой стрелки): 


(seta width (аитх_Ше “Богааг”) 

height (dimy_tile “Богаег”)) 
(start_image “border”) 

(vector_image 0 0 0 height 1) 
(vector_image 0 height width height 1) 
(vector_image width height width 1) 
(vector_image width 0 0 01) 
(end_image) 


Функции отрисовки должны ‘вызываться вместе. Изобразим закра- 
шенное изображение и нарисуем на нем вертикальную линию: 


(setq width (dimx_tile “striple”) 
height (dimy_tile “striple”)) 
(start_image “striple”) 

` (fill_image 0 0 width height 3); 3 - зеленый цвет Автокада 
(setq х(/ width 2.0) 

(vector_image x 0 height 4); 4 - биоретоася цвет Автокада 
(end_image) 


4 


Отображаемые с помошью функции (slide_image) слайды могут. 
быть отдельными слайд-файлами (.sld) или частью файла библиотеки 
слайдов (.slb). Расширение указывать не нужно. Просто слайд именует- 
ся по имени, слайд из библиотеки именуется как’в меню: сначала имя 
библиотеки, затем имя слайда В скобках. Функция (slide_image) ищет 
слайд или библиотеку слайдов в соответствии с текущим путем поиска 
библиотек Автокадла. 

Предположим, что необходимо отобразить слайд {ррме\. 51а: 
(setq x (dimx_tile “мем) 
y (dimy_tile “view”)) 
(start_image “view”) 
(slide_imageė 0 x y “topview”) 
(end_image) 

Векторы, слайда часто рисуются белым HBETOM, который является 
цветом фона изображения по умолчанию. Если слайд после вывода не 
виден, надо изменить атрибут color на значение graphic_background. 


Ввод клавиши изображения. 


Клавишу изображения можно обрабатывать как и обычную клави- 
шу, T. €. при ее указании вызывается соответствующее действие. Однако 
имеется возможность определения клавиши так, что действие будет 34- 
висеть от места указания в зоне клавиши. Для этого действие клавиши 
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должно получить координаты точки указания. Координаты задаются 
в диапазоне размера изображения и возвращаются функциями опреде- 
ления размеров. 


Пример: 

Допустим, что клавиша изображения имеет две прямоугольные об- 
ласти разного цвета. Требуется определить, какую из областей указал 
пользователь. Если клавиша разделена горизонтально, следует проверять 
только один размер: 


(action_tile “!таде_зе{” “(рск_зПаде” $key $value $у)”) 


(defun pick_shade (key val у) 
(setq threshold (/ dimy_tle key) 2)) 
(if (y threshold) 

(setq result “Светлый”) 

(setq result “Темный”)) 


) 


Обработка групп выбора 


Кнопки выбора появляются в группах выбора. Значение каждой от- 
дельной кнопки может быть равно единице, если она включена, или 
нулю, если она отключена. Значением группы кнопок выбора является 
ключ, выбранной в данный момент кнопки. Проводится проверка 
включения только одной кнопки. Приложение может присвоить дейст- 
вие каждой отдельной кнопке выбора, но более приемлемым является 
присвоение действия группе кнопок выбора как единому целому и ис- 
пользование присылаемого ключа для определения, какая из кнопок 
выбрана в данный момент. 

Пример: 

Допустим, что группа кнопок выбора определяет вид трехмерного 
объекта, который будет отображен после закрытия диалогового окна. 
При этом группа состоит из четырех кнопок (их может быть и больше): 


(action_tile “Мем/_ зе!” “(pick $уаше)”) 


(defun pick_view (which) . 
((cond ((= which “front”) (setq show_which 0)) 
((сопа ((= which “top”) (setq show_which 1)) 
((сопа ((= which “left”) (setq show_which 2)) 
((cond ((= which “right”) (setą show_which 3)) 


Этот пример показывает, что все кнопки выбора связаны с одной 
переменной, которая может ‘иметь несколько значений. Кроме того, 
кнопки выбора могут выполнять еще и некоторые дополнительные net- 
ствия, например отменять сделанный в диалоговом окне выбор. 


Обработка скользящих шкал 


Действие скользящей шкалы проверяет код причины. В качестве 
примера покажем базовую схему функции управления скользящей шка- 
лой. Она вызывается из связанного с ней выражения действия. Поле 
slider_info используется этой функцией для вывода в десятичной форме 
текущего значения состояния шкалы и является текстовым полем, кото- 
рое дает пользователю возможность управлять состоянием скользящей 
шкалы, непосредственно вводя значения. Если’ пользователь ввел 
значение в поле Slider_info, функция текстового поля изменит значение 
состояния скользящей шкалы: 


(action_tile “my_slider” ”(slider_action $value $геазоп)") 


(action_tile “my_info” “(ebox_action $value $reason)”) 


- 


(defun slider_action (val why) 
(it (or (= why 2) (= why 1)) 
_ (set_tile “slider_info” val) 

| ) | 

) 

(defun ебох_асйоп (val why) 
(if (or (= why 2) (= why 1)) 

(set_tile “myslider” val) 


) 


Обработка текстовых полей 


Действия, управляющие текстовыми. полями, аналогичны функци- 
ям обработки скользящих шкал, но при этом значение. текстового поля 
всегда видимо и нет необходимости выполнять действия, связанные 
с промежуточными результатами. 


Пример проверки значения без вывода его заново: 


(actio_tile “myeditbox “(edit_action $value $геазоп) 
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(defun едК_асйоп (ма! му) 
| (И. (or (= мМу.2) (= why 4)) 
(set_tile “myeditbox” val) 


) 


Определяемые приложением данные 


Функция client_data-tile присваивает‘ полю определяемые приложе- 
нием значения переменных. Эти данные доступны‘аналогично перемен- 
ной Автолиспа $data. Данные приложения ‘имеют смысл только во врс- 
мя исполнения приложения. Использование данных приложения срав- 
нимо с использованием определенных пользователем атрибутов. Основ; 
ное различие состоит в том, что атрибуты пользователя ‘предназначены 
только для чтения, в то времЯ как данные приложения могут изменяться 
во время выполнения программы и пользователь может проверить опре- 
деленный им ‘атрибут в ОСГ-файле приложения, а данные приложения 
для пользователя недоступны. В Автолиспе данные приложения опреде- 
лены текстовыми строками. | 


Пример: 

Так как программа должна поддерживать список, выводимый в по- 
ле списка (или в раскрывающемся списке), данные приложения могут 
быть использованы для обработки этой информации. В Автолиспе сле- 
лующая модификация определения функции (mk_list) возвращает спи- 
сок как аргумент: | 


(defun mk_list (readlist displist) 
(setq count 1) | 
(while (setq item (read readlist)) 
(setq retlist (cons (nth item displist) retlist)) 
(while (and (/= “ “ (substr readlist count 1)) 
(while (and (/= "” (substr readlist count 1)) 
(/= “ “ (substr readlist count 1))) 
(setq count (1+ count)) 

) 
(şetq readlist (substr readlist count)} 


(reverse retlist) 


) 
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Это обстоятельство устраняет необходимость в переменной гло- 
бального списка. Следующие вызовы в основной ‘части программы 06- 
работки диалоговых. окон связывают короткий список с полем: вызыва- 
ют функцию (client_data_ tile), затем передают список в функцию 
(mk_list) посредством выражения действия: 


(client_data_tile “colorsyslist” 
“Red-Green-Blue Cyan-Magenta-Yellow Hue-Saturation-Value”)- 
(action_tile “colorsyslist” “(setq usrchoice (mk_list $value $data)}”) 


3.6. Примеры разработки диалоговых окон 


Рассмотрим использование диалоговых окон в Лисп-программах. 
Примером такого использования может служить программа построения 
поверхности, описанной координатами точек вершин, записанных 
в файле, имя которого вводится в процессе работы программы. 


`; Программа построения графика функции f(x, у), заданной 

; с равномерным шагом в виде квадратной матрицы чисел, 

‚ расположенных по столбцам и зайисанных в отдельном файле 

; Для использования в 12-й версии Автокада добавлен режим ввода 
; данных по запросам программы через диалоговые окна 


В О E АСР 


(defun slider_action (val why) 
(if (or (= why 2) (= why 1)) 
(set_tile "п" val)) . : 
) | | | 
(defun ебох_асйоп (val why) 
(if (or (= why 2) (= why 1)) 
(set_tile "n_s" val)) 


) 


Первые две функции предназначены для формирований значений 
переменных, используемых в скользящей шкале и информационном ок- 
не. Затем идет тело программы, в которой инициализируется диалоговое 
окно. Раздел, связанный с диалоговым окном, выделен в рамку. 


(defun C:plot3d () 


Первой функцией вызывается функция вызова стандартного для 
Автокада диалогового окна выбора файлов: 


(setq f (open (де еа "Выбор исходного файла" "" “res” 2) “г”)) 


Затем загружается прилагаемая в стандартной поставке функция 
fplot: 


(if (= fplot nil) (юаа "fplot")) 


‚ Загрузка диалогового окна 
(setq ас! 14 (Iload_dialog “"plot3d”)) 
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(if (not-(new_dialog “plot3d" del_id)) (exit) 
-| ; Активизация переменных 
(action_tile “n _ s” ”(slider_action $value $reason)") 
(action_tile "n” "(ebox_action $value $réason)") 
(action_tile “accept” 
(strcat "(ргодп (setq msz (atoi ({get_ tile \" п\”)))" 
"(done_dialog))”)). 
; Запуск диалога 
(start_dialog) 
‚ Выгрузка диалога 
(unload_dialog dcl_id) _ 


(initget 7) 
(defun 2(х y) 
(atof (read-line f)) 


.) 
(fplot ‘2 '(-2 2) '(-2 2) msz) 
(close f) 
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Текст описания диалогового окна (ОСТ -файл) приведен ниже: 


/* plot3d.DCL - файл управления диалогом для plot3d. LSP */ 
plot3d : dialog { | 
J” label = "Выбор размера матрицы”; 
| : row { 
: edit_box { 
label = “Размер”; 
value = 40; 
edit_width = 2; 
fixed_width =true; 
key = "п";} 
: slider { 
max_value =. 99; 
min_value = 25;. 
small_increment = 1; 
big_increment = 5; 


key = "п_5"; 
width = 46; 
value = 40;}. 


} 
: button { 
label = "Готово"; 
key = "accept"; 
fixed_width =true; 
alignment = centered; 
is default =true;}} 


Описание каждой части диалогового окна “прозрачно”. 
Выведенное на экран окно выглядит следующим образом: . 
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kas 


Готово 


Изменение размера матрицы может производиться либо перемеще- 
нием квадратика скользящей шкалы с немедленным изменением значе- 
ния числа в информационном прямоугольничке, либо активизацией ин- 
формационного прямоугольничка и вводом туда конкретного числа, что 
приведет к изменению положения квадратика скользящей шкалы. 
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Глава: 4 


Меню Автокада и его настройка 


В меню Автокада вызываются как базовые, так и разработанные 
пользователем команды и макроопределения (вставленные в меню по- 
следовательности команд, соответствующие данной задаче, или про- 
граммные коды на языках Автокад и DIESEL.. Из макросов можно Bbl- 
зывать пакетные файлы или Лисп- и СРП-программы). По сути, все 
разработанные для Автокала приложения представляют собой набор 
Лисп- или СРП-программ и разработанных под них меню, с помощью 
которых они вызываются при работе. Файлы меню представляют собой 
обычные текстовые файлы, содержащие командные строки и макрооп- 
ределения Автокада. Исходные файлы имеют расширение тии, компи- 
лированные файлы имеют расширение „тих. При первоначальной 
загрузке исходного файла он компилируется в файл .mnx. После penak- 
тирования исходного файла и последующей его загрузки он компилиру- 
ется заново. Это происходит на основе отслеживания времени создания 
файла .mnu и файла .mnx. Если этого не происходит на вашем компью- 
тере автоматически, обратите внимание на системные часы компьютера. 

В 12-й версии Автокала описание макроопределений для меню 
может Помещаться не в файл меню, как это делалось в более ранних 
версиях, а в отдельный файл с тем же именем и расширением .mnl, KO- 
торый загружается в память при загрузке файла меню. 


4.1. Структура меню 


Файлы меню делятся на разделы, относящиеся к определенным зонам 
меню (экранное и палающие меню). Разделы меню могут содержать 
субменю, которые листаются по экрану с помощью ссылок. Командные 
строки и макроопределения, вызов которых приводит к выполнению KO- 
_ манды, называются пунктами меню. Пункты меню имеют заголовки. Хотя 
по структуре и действию все.пункты меню аналогичны, в каждом разделе 
меню используется свой собственный синтаксис меток заголовков. 


Зоны меню 


’Меню Автокада подразделяется на зоны: 
è экранного меню; 
èe падающих и курсорного меню; 
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графических меню; 

кнопочных меню устройства указания; 

планшетных меню; 

дополнительного меню устройства (системной МЫШИ). 


Файл меню может содержать разделы для каждой зоны меню. 
Соответствующие разделы; загружаются в различные зоны. Например, 
пункты экранного меню загружаются в зоне экранного. меню. Если 
планшетные меню настроены, загруженные новые планшетные меню 
становятся доступными из соответствующих зон планшета. Если на уст- 
ройстве указания имеется несколько кнопок, кнопки, не используемые 
для выбора объектов, можно использовать для выбора пунктов непо- 
средственно из нового загруженного кнопочного меню. 

В файле меню может и не содержаться входа для каждого раздела 
меню. Это позволяет экспериментировать с каждым разделом независи- 
мо от других и добавлять только разделы, необходимые для конкретного 
приложения. 


Метки раздела 


Разделы файла меню начинаются с меток. Каждому разделу соот- 
ветствует свой заголовок, после которого следует последовательность 
команл раздела меню. | 
РЕ TO ЕЕК... с;, ЗИ ОЕ, E БИЛО EE ОКИ 


Метка раздела Зона меню 


***ВОТТОМ п Кнопочные меню устройства указания. 

(п- число от. l до 4) 
***АОХп Дополнительное кнопочное меню 

(n - число от l до 4) | 
***РОРп Падающие и курсорное меню (п - число от 0 до 16) 
*** СОМ ° Графические меню 
*** SCREEN Экранное меню 
***TABLETn Планшетные меню (п - число от 1 до 4) 


_ Для Автокада 10-й и 11-Й версий число кнопочных и дополнитель- 
ных кнопочных меню ограничено |, число падающих меню - 10, и кур- 
сорное меню (с индексом 0) отсутствует. Метки указывают на начало 
раздела. 


Пример: 


***ЭСАЕЕМ 
(Нер]Нер — 
[Quit]Quit Yes 
“TABLETI 
Uine 
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circle 
*** BUTTONS 
erase 
oops 

Для русифицированного Автокада команды и их опции (He 3a- 
ключенные в квадратные скобки надписи) должны записываться на рус- 
ском языке. Для [2-й версии Автокадла’они уже могут быть английски- 
ми, HO C- предварительным. подчеркиванием. Если в файле нет’ метки 
***5СКЕЕМ, Автокад действует так, как если бы’эта метка предшество- 
вала первому пункту меню Автокада. При этом такой конкурирующий 
pesar hii работать также, как и экранное меню. 


Субменю 


Раздел меню может быть очень большим и He помещаться в выде- 
ленные зоны ‘экрана. В этом случае он разделяется на субменю - более 
мелкие группы пунктов меню, расположенные внутри раздела меню. 
Например, выбор пункта EDIT экранного меню приводит.к появлению 
на экранном меню команд редактирования. В зоне экранного ‘меню 
пункты субменю заменяют все текушее меню или его часть. Субменю 
могут образовывать’ вложенные сТруктуры. Механизм листания меню 
для различных разделов разный. 

Метка субменю определяет начало подраздела в файле меню. Она 
имеет следующий формат: 


“‘имя-меню [номер] 


Метка имя-меню может содержать до 31 символа и включать бук- 
bi, цифры и специальные символы “5”(доллар), “_^(подчеркивание) и 
“-”(дефис). В метке не должно быть пробелов. Необязательное целое 
число номер задает номер начальной строки субменю. Пункты субменю 
непосредственно за меткой относятся к этому субменю. Разделы меню 
и субменю можно вызывать из других разделов./ 

Обращение к субменю выполняется следующим образом: 


Фраздел=субменю 


где $ - специальный символ, используемый для указания загрузки раз- 
дела меню. В 12-й версии запись $М= позволяет пункту меню вызывать 
строковый РНЕЗЕГ-макрос; раздел - указывает раздел меню. Допустимы 
следующие имена: . 


Имя Меню, для которого используется данное имя 
S SCREEN 

P1-P16 POP от 0 до 16 

I ICON 

B1-B4 BUTTON or 1 до 4 
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Т1-Т4 TABLET от 1 до 4 
А]1-А4 AUX от | до 4 


субменю - указывает имя активизируемого субменю по метке этого 
субменю. | 


Примеры: 


$S=DRAW1 
$T1=EDITCMDS 
$I=HATCH1 


Перед активизацией субменю копируется в стек. Например, если 
пункт меню содержит команду SS=PARTS, то активные пункты на эк- 
ране копируются в экранный стек, а пункты субменю **РАВТЗ активи- 
зируются. Чтобы восстановить предыдущие пункты экрана пункт меню 
должен содержать команду 


$$= 


без какой-либо метки субменю. При этом происходит извлечение из 
стека загруженных в последний раз пунктов, т. е. их повторная активи- 
зация. Допускается до $ вложенных запросов субменю. Активизацию 
субменю можно осуществлять в ходе выполнения .команды без ее mpe- 
рывания. Например, последовательности команд 


$5=ААС=ДУГА 
ДУГА $$=АВС 


За именем субменю должен следовать пробел для отделения ero oT 
последующих команд в пункте меню. 


Пример файла меню: 


*** SCREEN 
[ПРИМЕР] 
s ‚ пустая строка 
([РИСУЙ...]$$=Огам_Вос\ в 
(Редакт...]1$$=Е9\_Воо\ | | 
‚ пустая строка 

[Пока]дконец | 

; Три пустые строки заполняют страницу 

; меню до 10 строк и служат для 

; замещения (перекрытия) пунктов субменю. 
[-Главн-]1$$=5САЕЕМ | | 

‚ Так как ни одно из субменю не опускается ниже этой 

‚ строки, она отображается во всех меню и служит 

; для вызова основного меню. | 
**Огам/ Вос! 2 | | | 

‚ 2 после имени субменю начинает его с пустой 

; строки ‘после строки [ПРИМЕР] 
(Отрезок: |Отрезок 


(Круг: ]Круг 
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(Дуга: ]Дуга | 
‚ Не менее одной пустой строки 
**Edit_Root 2 


[Сотри: — ]$$=$е О Сотри 
(Копируй: ]$$=$е ОБ] Копируй 
[Перенеси]$$=$е!_ОБ Перенеси 


**Obj_sel 2 
**Sel_Obj 2 
| i ; Для вызова этого меню можно использовать имена 
; и О_5е!и $е ОБ. 
[Последний]Последний ‘ - 
(Текущий]Текущий 
[Рамка]Рамка 
[Секрамка]Секрамка 
[- ПРЕД-]$$= 
$$= вызывает предыдущее меню 
***ВИТТОМ$1 ‚ присваивает “Enter” кнопке 2 
Освежи ‚ присваивает команду Освежи” кнопке 3 


В данном примере приведены три субменю: *Draw_Root, Еди_Коо\ 
и $6105}. Субменю Draw_Root и Edit_Root вызываются из основного 
экранного меню при выборе пунктов Рисуй или Редактируй. Субменю 
Draw_Root позволяет выбрать три пункта, соответствующие. командам 
Автокада. Субменю Edit_Root также содержит три пункта, каждый из 
которых включает субменю Sel_obj перед выполнением соответствую- 
щей команды. 

Во всех меню в первой строке появляется пункт -ГЛАВН-, выбор 
которого позволяет возвратиться в главное экранное меню. Каждое: 
экранное меню перекрывает лишь столько строк, сколько строк в нем 
содержится. Если экранное меню содержит больше пунктов, чем строк 
на экране, или кнопочное меню содержит больше пунктов, чем имеется 
кнопок, лишние строки игнорируются. Для удлинения субменю с це- 
лью перекрыть предылущие меню можно использовать пустые строки. 


Синтаксис пунктов меню 


Каждый пункт меню может состоять из необязательного заголовка, 
команды или последовательности команд и параметров; обычно каждый 
пункт. меню находится на одной строке. Если командные параметры 
(опции) присутствуют в строке меню, будьте внимательны и проверьте 
последовательность их залания вводом команды из командной строки. 
Все символы строки являются значимыми, даже пробелы. Следите за 
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тем, чтобы после заголовка пункта меню не было пробела! Заголовки - 
это набор символов, который заключается B квадратные скобки. `Заголо- 
вок не обязательно повторяет имя команды. В каждом типе меню заго- 
ловки обрабатываются по-разному. Текст заголовков для’ кнопочных, 
планшетных и дополнительных меню не отображается и используется 
в качестве комментария в файле меню. 

Введенная в 12-й версии системная переменная МЕМОСТГ, управ- 
ляет автоматической сменой экранных меню при вызове соответствую- 
щих команд. Если она установлена в единицу (Вкл) и команда вызыва- 
ется из пункта меню, происходит выполнение выражения $=имя_ко- 
манды, которое вызывает экранное субменю с именем, соответствую- 
шим имени команды (если такое существует). В стандартном меню 
acad.mnu переменная ЕМОСТЕ устанавливается в. единицу из файла 
acad.mnl. . 

При выборе пункта меню Автокад автоматически ставит после него 
пробел. Например, если имеется пункт меню 


LINE 


то Автокад. воспринимает его как команду LINE Spacebar. Иногда это 

нежелательно. Например, в конце текстовой строки, создаваемой ` KO- 

мандами TEXT или IMENSION, должен стоять не пробел, а ENTER. 

В других. случаях для завершения команды необходимо использовать 

более одного пробела (или ЕМТЕК), однако некоторые текстовые редак- 

торы не позволяют создавать строку, завершающуюся пробелами. Для 

решения этих проблем приняты следующие соглашения: 

èe ссли в пункте меню появляется точка с запятой (;), Автокад: заме- 

няет се на ЕМТЕК; 

‹ ® ссли строка заканчивается каким- -либо управляющим символом, 
обратной косой чертой (\), знаком плюс (+) или точкой с запятой 
(;), Автокад не добавляет после него пробела. 


Если в процессе выполнения пункта меню требустся ввести инфор- 
мацию с клавиатуры или устройства указания, вводится обратная косая 
черта. После нее пробел не ставится. . 


Пример: 
[Kpyr]Kpyr \1 

Здесь запрашивается положение центра, затем считывается единица 
как радиус. 

Обычно после ввода одного параметра пункт меню продолжает вы- 
полняться. Поэтому конструкция пункта меню, в которой допускается 
ввод произвольного числа параметров (как при выборе объектов) и за- 
тем продолжение каких-либо операций, невозможна. Это ограничение 
не распространяется на команду ВЫБЕРИ (SELECT): в этом случае 
обратная косая черта задерживает выполнение следующей операции до 
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тех пор, ‘пока набор не будет полностью сформирован, т. €. пока не 6y- 
дет нажата клавиша “ЕМТЕК”. 


Пример: 
[Yellow]Select \change previous ; properties color yellow ; 


Здесь используется команла ВЫБЕРИ (SELECT) для формирова- 
ния набора из одного или нескольких объектов. Затем выполняется ко- 
манда ИЗМЕНИ (CHANGE), производится обращение к набору “Теку- 
щий” (“Previous”) и цвет выбранных объектов изменяется на желтый. 

Так как обратная косая черта приостанавливает выполнение пункта’ 
меню, ее нельзя использовать’ для других целей; при необходимости 
ввода пути доступа K файлам в меню следует использовать символ пря- 
мой косой черты: /support/acad.mnńu. 

Выбранный пункт меню не возобновляется: 

e ДО завершения выбора в режиме объектной ‘привязки, если OKNA- 
ется ввод точки; | 
e ДО завершения ввода всех координат точки, если используются KO- 
ординатные фильтры; 
‚ `®. до завершения всего набора в команде ВЫБЕРИ (SELECT); 
è при вводе “прозрачной” команды - до ее. выполнения и ввода 

Enter; | 

è если в качестве ответа указывается другой пункт меню (для выбора 
опции или выполнения “прозрачной” команды) до выполнения 
этого пункта (в свою очерель, новый выбранный пункт может 
иметь свои символы обратной косой черты). 


12-я версия Автокада отличается от предылущих еще и тем, что при 
вводе команд и их опций на английском языке они автоматически Nepe- 
водятся на русский, если перед командой или ключевым словом стоит 
символ подчеркивания (_). Это справедливо и для меню, и для ввода 
команд с клавиатуры. 


Пример фрагмента стандартного меню Автокада русскоязычной версии: 


***РОРО 

[Привязка] 

[БЛИжайшая]_пеа 

(КАСательная] {ап 

(КВАдрант]_аца 

(КОНточка]_епар 

[НОРмаль]_рег 
[ПЕРесечение]_и{ | s 
[CEPennna]_mid 

[TBCTagxn]_ins 

(УЗЕл]_ под. 

[ЦЕНТр]_сещег 

([НИЧего]_поп 
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Для отмены действия команды из. командной строки мы использу- 
ем ввод Ctrl+C. В этом случае команда отменяется на один уровень: €C- 
ли Автокад выполняет основную команду, она отменяется; если выпол- 
няется “прозрачная” команда внутри основной, ввод Ctrl+C отменяет 
“прозрачную” команду; если выполняется сложная команда, например 
DIMENSION (РАЗМЕР) и в ней команда, например, ANGLE (УГЛО- 
ВОЙ), а в ней cme и “прозрачная” команда, например ZOOM (ПОКА- 
ЖИ), то для отмены всей этой гирлянды требуется ввод трех послелова- 
тельностей Ctrl+C. В меню такая последовательность действий выпол- 
няется вводом нужного числа символов ^С без пробелов. 

Кроме управляющего символа ^C в Автокале могут использоваться 
и другие управляющие символы, которые выполняют определенные 
действия, например включение и выключение сетки, режима орто, TIC- 
рехода на другую плоскость изометрии и т. д. Неалфавитные. управляю- 
щие коды ASCII отмечаются символом (^), за которым следует еще 
ОДИН СИМВОЛ: 


© (ASCII код 0) | 
`[ (ASCII код 27) 
N | (АЗСИ код 28) 
`] (ASCII код 29) 


> (ASCII код 30) 
^ (ASCII код 31) 


Использование комбинации ^Н. которая применяется для стирания 
символа слева от курсора, дает возможность формирования “цифровой 
клавиатуры”: 

[1]1жН 
[2]2х^Н 
(3]3х°Н 
(4]4х`Н 


[Дес. точка].7Н 
[Ввод] 

При выборе соответствующей строки-меню вводится требуемая 
цифра или десятичная точка, а, поскольку все строки, кроме последней, 
заканчиваются управляющим символом, к ним не добавляется ни про- 
бела, ни “ENTER”. Послеловательно введя 


[2],[3],[Дес. точка], [1], [4], [Ввод] 


получим число 23.14. 

Если пункт меню не помещается в одну строку. его можно продол- 
жить на следующей строке, поставив в конце предыдушей знак плюс 
(+). Число строк продолжения не ограничивается. 

Выполнение каждой команды заканчивается приглашением к вы- 
полнению следующей команды. Иными словами, если выполнена одна 
команда, Автокад приглашает ввести следующую высвечиванием 
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сочетания Command: (Команда:) в командной строке. При необходимо- 
сти повторного вызова только’ что выполнившейся команды, вызванной 
из какого-либо раздела меню, такая строка меню должна начинаться 
звездочкой (*). Именно этот механизм‘ используется в падающем меню 
DRAW (РИСУЙ). Функция О не действует в пунктах графических 
меню. 

В командах редактирования опции выбора объектов можно огра- 
ничить выбором только одного объекта, указав после вызова команды 
‘ключевое слово “Единственный” или “_ Зе” (в английской версии - 
“Single”). В качестве примера можно привести пример формирования 
команды. ERASE (СОТРИ) при выборе одного объекта и его немедлен- 
ного стирания без дополнительных действий: 


[Corpu один]*^С^С_Егазе _Single 
[Сотри один] *“^С^ССотри Единственный 

Обе строки в русскоязычной версии Автокала работают одинаково. 
Звездочка перед команлой приводит к повторному вводу команды СО- 
ТРИ, работающей в выбранном режиме. 


Перечень управляющих последовательностей CHMBOJIOB, использу- 
емых в файлах меню: 


Символы Описание 

ыы Указывает начало заголовка 

ыы Указывает метку раздела меню 

[I Вылеление заголовков для пунктов и разлелов 
меню 

; или ^M Ввод клавиши “Enter” или “Spacebar” 

^I | Ввод клавиши “ТАВ” 

<пробел> Пробел между последовательностями команд и их 

‚ опций эквивалентен вводу Enter 

\ Приглашение к вводу информации пользователем 

_(подчеркивание) — Перевод на русский язык английской команды 
ИЛИ ОПЦИИ ' 

= Продолжение набора команд на следующей строке 

=* Вывод текущей пиктограммы, падающего или 
курсорного меню на экран 

E Повтор команды, вызванной из меню, после 
выполнения . 

$ ` Загрузка раздела меню или ввод условного 
выражения языка DIESEL ($М=) 
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^В Переключение режима Шаг 


ге Отмена команды 
^D Переключение режима отображения координат 
^E Переход Ha следующую плоскость изометрии . 
^G Переключение режима Сетка 
^Н | Удаление предыдущего символа 
^O | Переключение режима Орто 
^Р | Переключение системной переменной 
| МЕМОЕСНО 
^Q Переключение эхо-вывода на принтер 
^T Нереключение режима Планшет, 
^V Изменение, текущего BILIOBOTO экрана 


Кнопочные и дополнительные меню 


Кнопочное (BUTTONS и ВУТТОМ$1-4 для 12-й версии Автокала) 
и дополнительные меню (AUX и AUX 1-4 для 12-й версии Автокада) 
аналогичны по формату. Их использование зависит от типа используе- 
мого системой устройства указания. Если у компьютера нет системной 
мыши (встроенного устройства указания), имеющееся устройство будет 
использовать ‘кнопочные меню. Системная мышь использует дополни- 
тельные меню, .а другое устройство будет использовать кнопочные 
меню. | 

По описанию кнопочные и дополнительные меню аналогичны. 
Доступ к кажлому кнопочному меню можно осуществлять путем 
нажатия последовательности клавиш и кнопок: 


Последовательности кнопок U клавиш Кнопочные меню 
Нажатие одной кнопки ый | ВОТТОМ$1 
Нажатие клавиши Змй+кнопка ВОТТОМ$2 
Нажатие клавиши Си]1+кнопка BUTTONS3 


Нажатие клавиши ShifttCtrltkHonka BUTTONS4 


Для совместимости с 19-й и 11-й версиями меню BUTTONS анало- 
гично меню ВОТТОМ$1. Если в меню имеются разделы BUTTONS 
и ВОТТОМ$, в 12-й версии предпочтение отдается BUTTONSI, | 

Раздел BUTTONSI кнопочного меню в стандартном файле 
асадлипи выглядит следующим образом: 


**"ВУТТОМ$1 
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$p0=* 

“C'°C 

~B. 

"Q 

“G 

"D o 

“E 

~T . 

В этом разделе кнопка указания не программируется, а первая 
строка, т. €. точка с запятой, относится K программированию второй 
кнопки. Кнопка выбора не перепрограммирустся во всех меню! Устрой- 
ство указания будет распознавать только те строки, лля которых имеют- 
ся кнопки. Способ кодирования команд для кнопок аналогичен только 
что рассмотренным. В кнопочных меню заголовки в квадратных скоб- 
ках рассматриваются как комментарии. При выборе кнопочного меню 
Автокад воспринимаст не только номер кнопки, но и координаты пере- 
крестия на экране. Эти координаты можно использовать в выбранной 
команде. Для этого используется символ обратной косой черты, которая 
в этом случае позволяет ввести сразу после команды зафиксированную 
точку: 

**"ВУТТОМ$ 
LINE 
LINE \ 


Второй кнопке запрограммирован ввод команды ОТРЕЗОК (ЫМЕ) 
с игнорированием точки указания. при нажатии третьей кнопки изобра- 
жение отрезка начнется из точки ‘указания и команда ИрОЛОЖИт диалог 
приглашением К точке: (То point: ). 


Экранные меню 


Раздел экранного меню управляет зоной бокового экранного меню 
на экране Автокада. Если в файле меню нет этого раздела, Автокад при- 
сваиваст этой зоне текст меню, расположенный в начале файла. Экран- 
ные меню не ограничены по размеру. | 

Метка раздела ***5 СКЕЕМ означает начало экранного меню Авто- 
када. Метка **$ указывает раздел субменю. В начале сеанса редактиро- 
вания на дисплее Автокада в зоне экранного меню появляется корневое 
меню, т. €. страница с меткой S. 
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Раздел экранного меню... 


... И его отображение на:экране: 


*** SCREEN 
Sa Автокад 
[Автокад]^С^С-7Р(а!_гоо\тепиз) ^P 
[*** *]$5=ОЗМАРВ БЛОКИ | 
[БЛОКИ]$$=Х $S=BL ДИСПЛЕЙ 
[ДИСПЛЕЙ]$5=Х $$=0$ НАСТРОЙ 
[ЛИСП]$$=Х $$=ЕР ПОВЕРХН.. 
[НАСТРОЙ]$$=Х $$=$ЕТ. ПСК: 
[ПАРАМЕТ]$$=Х $5$=АСАОЕМСЕ РАЗМЕР: 
[ПОВЕРХН.]$$=Х $$=30 РАС 
[ПСК:]^С7С_ 46$ РЕДАКТ 
[РАЗМЕР:]^С7С_ОМ РИСУИ 
[РАС]^С^С^Р(а1.азешй_снк) ^P СВИД 
([РЕДАКТ]$$=Х $S=ED ‚СЛОИ. .. 
[РИСУЙ]$$=Х $S=DR СПРАВКИ 
ТЕЛА 


[СВИД]$$=ММЕМ/ 
[СЛОЙ...]$$=1АУЕВ '_DDLMODES 
[СПРАВКИ] $$=Х $$=МО 
[ТЕЛА] $ $=Х.$5$=$040$ 
[ТОНИР]$$=Х $SFRENDER 
[УТИЛИТЫ] $$=Х $S=UT 
[ЧЕРТИ...]^С^С_РИОТ 


[СОХРАНИ:]^С7С_О@ЗАУЕ 


ТОНИР УТИЛИТЫ 
ЧЕРТИ. .. 
СОХРАНИ: 


В Автокале принято соглашение об окончании заголовков строк, 
соответствующих настоящим командам Автокада, двоеточием. Если no- 
‘смотреть на представленные картинки, то мы увидим, что на первой 
странице меню всего несколько истинных команд: остальные строки 
управляют псрелистыванием меню. Большинство строк первой страни- 
цы меню начинается конструкцией 


$$=Х 


Это вызов страницы меню, которая просто готовит место под вывод 
нового набора команд. На каждой странице может присутствовать раз- 
личное число строк. Поэтому, если страница короткая, на ней будут 
присутствовать остатки предылущей страницы. Для предотвращения та- 
кого нежелательного наложения заготовлена специальная “очищающая“ 
страница, которая имеет вид: | 


X3 


‚ 15 пустых строк 


[ПРЕДМЕНЮ]$$= $$= 
[РИСУЙ ]“`С^С$$=Х $S=DR 
[ РЕДАКТ ]`С^С$$=Х $$=Е0 
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Она начинается с третьей строки и заканчивается вызовами преды- 
дущей страницы, страниц редактирования и рисования. Первые две 
строки любой страницы меню предназначены для вызова корневого 
меню и меню объектных привязок. Эти соглашения не рекомендуется 
изменять и при создании своих новых страниц меню. | 


Подающие и курсорное меню 


Палающие меню располагаются в верхней части экрана. Они доступ- 

ны только при наличии устройства указания, т, €., если к вашему компь- 
ютеру не подключена мышь или планшет, эти меню недоступны. В 19-й 
и 11-й версиях Автокада максимальное число падающих меню составляет 
10, в 12-й версии их число увеличено до 16. Кроме того, в 12-й версии во 
многом изменился.в сторону расширения удобств пользования интер- 
фейс палающих меню. Это несколько усложнило способы их формирова- 
ния и программированного обращения. Введение языка DIESEL теперь 
позволяет программно перестраивать заголовки палающих меню. Кур- 
сорное меню представляет собой модификацию падающего меню, кото- 
poe вызывается одной из кнопок устройства указания (для двухкно- 
почной мыши это комбинация клавиш Shift + правая кнопка; для трсех- 
кнопочной мыши это вторая кнопка). В отличие от падающих меню. 
‚которые разворачиваются из строки меню, курсорное меню всегда появ- 
ляется в точке перекрестия курсора на графическом экране. Заголовок 
курсорного меню на экране не появляется и, по сути, представляет собой. 
просто комментарий в файле меню. Доступ к курсорному меню из других 
меню программ на Лиспе или Си производится с помощью команды. 
$РО=*. При активном курсорном меню строка меню отключается. 

В 12-й версии падающие меню могут содержать до 999 пунктов ме- 
ню, а курсорное меню - до 499 пунктов. Оба’ предела включают все суб- 
меню в иерархии. Если палающие или курсорное меню не помещаются 
на И экране по длине, лишние пункты усекаются. 

Каждый раздел падающего меню начинается с заголовка ***РОРип, 
где п может принимать значения от 0 (для курсорного меню) до 16 

в 12-й версии Автокала. Приведем символы, которые выполняют снеци- 
альные функции в заголовках падающих или курсорного меню: 


Символ Описание 


ки 


-- Заголовок пункта раздвигается, становясь разделительно! 
линией (если используется без других символов) 


не 9 Продолжает макроопределение на следующей строке 
(если в строке является последним) 

-> _ Указывает на наличие субменю (12-я версия) 

<- Указывает на последний пункт в субменю (12-я версия) 


Указывает на последний пункт субменю и завершает 


Вычисляет в заголовке строковый макрос языка DIESEL 
(если последовательность символов $ ( стоит в начале 


Помечает пункт меню специальным (не буква или циф- 
ра) символом. Последовательность !. (восклицательный 
знак с точкой) ставит специальный маркер (галочку). 
Поддерживается не на всех платформах (12-я версия) 


Указывает в заголовке клавишу акселератора меню. 
Поддерживается не на всех платформах (12-я версия) 


Указывет тип вылеления шрифта. Дог густимые типы: 


<О = контурный, % 


Поддерживается не Ha вссх платформах (12-я версия) 


<-<-... 
родительское меню (12-я версия) 
S( 
| строки) (12-я версия) 
С 
/с 
<c 
<B = полужирный, 
<$ = с оттенением, 
<I = курсивный. 
^имя^ 


В заголовке отображается пиктограмма имя. | 
Поддерживается не на всех платформах (12-я версия) 


Обычно падающее меню появляется непосредственно под. его заго- 
ловком. Но для отображения длинных пунктов крайние правые’ nala- 
щие меню сдвигаются влево. Максимальное количество пунктов. в TIA- 
дающих меню зависит от драйвера монитора (например, 21 для. обыч- 
ных мониторов). Это надо учитывать при разработке прикладных меню. 


(Средства] 
[ПОМОЩЬ! |"? 
([Отмена]^`С7С`С 

[=+] 

[OTMmenn]_U 

([Верни]`С7С_гедо 

ба 

(Объектные фильтры...]"ФИЛЬТР 

[->Объектная привязка] 
[--] 

[->Справки] 
(Список]^С7С_1$1 
(Статус]'_$З{а{и$ 
[--] 
[Площадь]”^С”С_агеа 
([Дист]'_ 9$ 
[<-Коорд]"_ а 

[--] 


(Калькулятор]'кальк 
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ПОМОЩЬ! 
Отмена 


5 

(0) 

© 
74 

D 

©) 


ще я 


Отмени 
Верни 


ааа id 


Объектные фильтры .. X 
Справки р 


О 


ен 


$ 
a 
Pa! 
< 
р, 
Para 


P, 


Здесь показан фрагмент файла acad.mnu M вид части развернутого 
ъпалающего меню на экране компьютера. В первой строке после раздс- 
лителя ***РОР2 расположен заголовок, который определяет данный раз- 
дел в свернутом виде. Длина заголовка не должна. превышать 14 симво- 
лов. Конечно, если вы хотите поместить все заголовки меню бсз иска- 
жений, заголовки следуст делать короче. В названия не рекомендуется 
вставлять пробелы, поскольку пользователь не сможет различить заго- 
ловки разных меню. Если первая строка пустая, в строке меню заголов- 
ки не появляются и не вызываются. Остальные заключенные в квадрат- 
ные скобки строки представляют! собой заголовки пунктов меню. Эти 
строки могут быть любой ллины, но не следует увлекаться длинными 
строками. | | р 

_ Строка меню. падающие или курсорное меню недоступны во время 
исполнения следующих команд: | | 
ДТЕКСТ (ОТЕХТ) после установки угла поворота; 

ЭСКИЗ (SKETCH) (после установки значения приращения); 
ТЗРЕНИЯ (VPOINT) (при выдаче компаса и точки зрения); 
ПОКАЖИ Динамика (ZOOM D); 

ДВИД (DVIEW). 


Графические меню 


Разлел меню ***1СОМ представляет собой меню в виде графичес- 
ких окон. Число окон и их размеры, выводимые на экран, для раз- 
личных версий Автокада различны: если для версий младше 12 мини- 
мальное число слайдов или команд в одном графическом экране равно 
4, а максимальное - 16, то в 12-й версии число экранчиков графическо- 
го‘меню фиксированно и равно 20. Зона графического меню ‘разделена 
на графичеёкую и текстовую части, взаимосвязанные между собой: при 
указании слайда подсвечивается соответствующая ему строка, и наобо- 
рот. Команды исполнения расположены в нижней части меню, и теперь 
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не требуется выделения места для их ввода в графической зоне. Число 
строк в каждом разделе графического меню не ограничено: Автокад сам 
разбивает их постранично по 20. на странице и предоставляет возмож- 
ность перелистывания отдельных страниц автоматически или опциями 


“Следующий”, “Предыдущий”. 
‚ Фрагмент графического меню на ‘экране выглядит следующим 


образом: 


**vporti 

(Настройка видовых экранов] 
[асад(\роп-1,Один)]^С^С(а! {Иедур 1 nil) 
[асад(урой-Зу, Три: вертикал)]“С^С(а! {1едур 3 "М") 
[асад(урой-Зв, Три: горизонт)урЗв]^С^С(а! \Йеадур 3 "С”) 
[асад(уроп-4,Четыре: равные)]`С`С(а! 4Йедур 4 nil) 
[асад(уроп-2у,Два: вертикал)]^С^С(а! 4Йедур 2 "М”) 
[асад(урой-Зг,Три: справа)]^С^С(а! 4Йедур 3 "В")_ 
[асаа(уроц-31, Три: слева)]^С^С(аг Шедур 3 “\") 
[асад(\уроц-41,Четыре: слева)]^С^С(а! {Иер 4 "Г") 
[acad(vport-2h, Ba: горизонт)]^С^С(а! \Иедур 2 "Н”) 
[асад(уроп-За,Три: выше)]^С^С(а! едур 3 "А"} -7 
[асад(урой-ЗЬ,Три: ниже)]”С”С(а! 4Йедур 3 “В”) 
[асад(уроц-4г,Четыре: справа)]“С”С(а!_Шедур 4 “R”) 


В начале раздела находится заголовок, который изображается 
в самом верху графического меню. Затем располагаются строки команл 
со своими заголовками. В зависимости от конструкции заголовка: поле 
списка заполняется по-разному: 


Поле списка | Результат вывода 

[имя_слайда] В поле списка выводится имя слайда, ко- 
торый отображается в виде пиктограммы 

[имя_слайда, заголовок | В поле списка выводится текст заголо- 


вок, а слайд имя_слайда отображается 
в виде пиктограммы” 


[библиотека (имя_слайда)] В поле списка выводится имя слайла из 
библиотеки слайдов библиотека, который 
отображается в виде пиктограммы 


[Библиотека В поле списка выводится текст заголо- 


(имя_слайда, заголовок) | вок, слайд имя_слайда из библиотеки, 
библиотека отображается в виде пикто-. 

| граммы | 

[пустой] При задании текста пустой заголовок 


используется как разделительная строка 
в поле списка и никакая пиктограмма 
не отображается 
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[ заголовок] Если первым символом. в заголовке 
пункта является пробел, в поле списка 
выводится текст заголовок и никакая — 
пиктограмма не отображается: Это поз- 
воляет использовать команды и пункты 
типа Выход без необходимости создания 
слайлов с соответствующими словами 


В 10-й и 11-й версиях Автокада поле списка отсутствует. Поэтому 
создание графических меню в этих версиях более простое и с меньши- 
ми возможностями. Приходится ограничивать раздел меню 16 строка- 
ми, выводя команды типа “Предыдущий”, “Следующий”, “Выход” 
через [заголовок] с первым пробелом и обеспечивать листание “стра- 
НИЦ” графического меню через вызовы следуюших разделов программ- 
но - явным образом. 


Три: вертикал 

Tpu: горизонт 

етыре: равные 
вертикал 


PRERA 


Графическое меню вызывается парой команд 


$1=имя_раздела 
$1=* | 


Эти команды могут присутствовать в любых разделах меню, HO их 
нельзя ввести с клавиатуры. Таким образом, первичный вызов гра- 
фического меню нужно обеспечивать либо из экранного, либо из па- 
лающего меню. В дальнейшем вызовы последующих графических меню 
можно осуществлять и из предылущих графических меню. На слож- 
ность создаваемых таким образом структур принципиальных огра- 
ничений нет, главное здесь - не запутать пользователя. | 
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4.2. Подготовка слайдов для графических меню 


Любой слайд, созданный в Автокаде с помощью команды ДСЛАЙД 
(МОЕ), можно использовать в качестве пиктограммы для меню. Для 
оптимального использования графических меню следует придерживать- 
ся следующих правил: 

è слайд должен быть достаточно простым, чтобы уменьшить время 
генерации пиктограмм на экране. Лучше использовать упрощенные | 
пиктограммы и не стараться получить слайд с подробной проработ- 
кой деталей; | | 

è изображение пиктограммы в графическом меню занимает относи- 
тельно небольшую площаль. Старайтесь использовать ее рацио- 
нально, заполняя всю зону картинкой. При подготовке слайда 
рисунок должен находиться в центре экрана и по возможности 
заполнять его полностью. Соотношение размеров пиктограмм в ме- 

_ ню соответствует соотношению ширина : высота = 1.5: 1. При рабо- 
те на видовом экране с таким соотношением его размеров можно 
разместить изображение так же, как оно будет выглядеть на пикто- 
грамме; | 

èe закрашивание областей на экране занимает много времени. Лучше 
не использовать закрашивание. и отключать режим закрашивания 
при использовании широких полилиний и фигур; 

è пиктограммы должны быть понятными. Не пытайтесь закодировать 
абстрактные представления. Пользователь средних способностей не 
должен ломать голову над возможными последствиями применения 
команды. 


4.3. Планшетные меню 


Если у вас есть планшет, его можно использовать для ввода команд 
Автокада. Если рассмотреть вопрос, с чем удобнее работать - с мышью 
или планшетом, то тут все сводится к тому, к чему вы привыкли. 
На планшете стандартной конфигурации собраны не все команды 
Автокада, а только наиболее часто используемые. Конечно, при хоро- 
шем навыке работать с планшетом можно быстрее, чем с мышью, 
поскольку доступ к командам осуществляется без листания “страниц” 
экранного или падающих меню. Так что если вам приходится 
заниматься большими объемами графических построений, то планшет 
имеет смысл приобрести и использовать не только как инструмент для 
ввода чертежей в режиме скалывания, но и как устройство ввода 
команд. | | 
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Автокад позволяет настроить до четырех областей планшета в ка- 
честве зон меню для ввода команд. Разделы файла меню с метками 
ТАВЕЕТ1-4 определяют макросы меню, связанные с определенным по- 
ложением зон указания относительно координат планшета. | 

В пунктах планшетного меню используется синтаксис, анало- 
гичный используемому в других разделах. Заголовки пунктов рассматри- 
ваются как комментарии. Автокад способен распознавать до 32766 
пунктов меню в каждом разделе планшета. 

°. В стандартном меню acad.mnu в разделе TABLETI заголовки no- 
мечают клетки темплета, прилагаемого к пакету. Команды в этих KJET- 
ках отсутствуют, да и ‘сам темплет в этом разделе “прозрачен”. Вы Mo- 
жете разместить свои собственные команды и макроопределения в эту 
зону и изобразить разбитый на клетки чертеж нужного размера для. BBO- 
да своих команд H ОРДЕН: Строки ниже [1-25] модифициро- 
вать не следует. 


4.4. Использование Автолиспа в макроопределениях 


Использование Автолиспа при создании макроопределений в меню 
позволяет: 


è сохранять данные в переменных, обрабатывать данные и передавать 
их Автокалу; 

» управлять отрисовкой примитивов посредством установки систем- 
ных переменных Автокада, сохранения системных переменных, за- 
прашиванием настроек и изменением их в соответствии с ответами 
пользователя; 

° устанавливать переменные B процессе выполнения команд (в “про- 
зрачном” режиме) для более полного удовлетворения запросов 
пользователя; 

èe устанавливать ответы по умолчанию на запросы Автокала и исполь- 
зовать их в командах и макроопределениях; 

è считывать и изменять геометрические данные объектов, используя 
данные в своих программах; 

è ПОЛУЧИТЬ ДОСТУП К СПравочной информации, содержащейся в табли- 
цах Автокала, а об установке слоев, блоков, стилях текста 
и типах линий. 


В этом разделе будет показано на примере, как можно воспользо- 
ваться средствами Автолиспа для модификации меню Автокада. Вооб- 
ще-то использование Автолиспа при изменении меню не обязательно - 
меню может и не обращаться к Автолиспу, используя только стандарт- 
ные команды Автокада. Однако практика показывает, что на каком-то 
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этапе развития вашего меню пользоваться. средствами. Автолиспа вам 
все-таки придется. Кроме того, даже если ваш пункт меню совсем прост 
и использует только команды Автокада, все равно желательно при по- 
мощи Автолиспа сохранять установленные по умолчанию значения ис- 
пользуемых системных переменных Автокада и восстанавливать их по 
окончании работы вашего подменю. Это позволит вам не беспокоиться 
об изменении установок Автокада или восстанавливать их вручную. 

Для примера решим следующую задачу. Если вы устанавливали 
в своей системе редактор *Моцоп Editor так, как было показано нами 
ранее, то, возможно, нашли утомительным каждый раз при вызове ре- 
дактора задавать ему имя файла, которое надо указывать Полностью - 
с расширением .lsp. Кроме того, при ошибке в имени файла этот редак- 
тор не выдает никакого сообщения, а просто открывает новый файл 
с тем именем, которое было ему указано. Поставим себе цель организо- 
вать полменю Автокада, названное, скажем, LISP, в котбром можно 
было бы, один раз задав имя файла-программы на Автолиспе, много- 
кратно вызывать его на редактирование. Желательно, чтобы имя файла 
можно было задавать без расширения, так как оно в нашем случае 
меняться не будет. — 

Решение лежит на поверхности: нужно написать на Автолиспе про- 
грамму (а если быть более точным, то это макроопределение, поскольку 
оно будет, вставлено в меню), которая запоминала бы один раз указан- 
ное имя файла в некоторой текстовой переменной. Поскольку внешним 
командам как и любым другим командам Автокада, можно из Автолис- 
па передавать параметры, нет ничего проще, чем автоматизировать этот 
процесс. i | 

Ниже показано, как можно это сделать. Придется внести измене- 
ния в меню Автокала (файл acad.mnu). Поместим подменю LISP в эк- 
ранное (SCREEN) меню. Автокала. Это делается добавлением в экран- 
ное меню всего одной строки: 


***ЭСВЕЕМ 

T | 

[АмоСАО]^С7С$$=Х $$=$ $Р1=РОР1 $РЗ=РОРЗ 

[* * * *]$3=О5МАРВ _ | 
[За&ир]^С^С^Р(ргодп(рготр! “Loading setup...” {load “з&ир”)) ^Р$$=Х+ $S=UNITS 


[BLOCKS]$S=X $$=ВЕ 

[DIM:]$S=X $S=DIM ^C^CDIM 
[DISPLAY]$S=X $S=DS 

[DRAW]$S=X $S=DR 

[EDIT]$S=X $S=ED 

[INQUIRY]$S=X $S=INQ 
[LAYER:]$S=X $S=LAYER ^С^СЬАУЕВ 
[SETTINGS]$S=X $$=$ЕТ 
[PLOT]$S=X $S=PLOT 
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[UCS:]$S=X $5=ИС$1 "С^СИС$ 
[UTILTY]$S=X $S=UT 
[LISP]$S=X $S=LP. 


[3D]$S=X $$=30 
([АЗНАОЕ]^С7С”Р(ргодп(зе{а гп:егг *error*)(prin1))(defun *error* (msg)+ 
(princ msg)(setq *error* mierr гл:еггпй)(рипс))(сопа ((nullC:SCENE)(vmon)+ 
(if (/= nil (findfile “ashade.Isp”))(progn (terpri);+ 
(prompt “Please wait... Loading ashade. “)(load “ashade”)+ 
(menucmd “$=Х”)(плеписта “S=ASHADE” )(setq *error* m:err m:err nil))+ 
(progn (1егри); (prompt “The file ‘Ashade.lsp’ was not found in your current+ search+ 
directories.” )\(terpri)(prompt “Check your AutoShade Мапиа!+ 
for installation instructions.” ); (setq *error* m:err m:err nil)(princ))))+ 
‚ (T (setq *error* m:err m:err nil)(menucmd “8=Х”)+ 
(menucmd “5=АЗНАОЕ”)(рийпс))) ^P 
[SAVE:] "C^CSAVE 
Kak видим, новое подменю отличается от стандартного только 
одной строчкой: 


[LISP]$S=X $SŻLP 


С ee помощью определяется подменю LP, в котором будут нахо- 
диться добавляемые нами средства. Переход в это подменю осуществля- 
ется при выборе пункта LISP стандартного экранного меню Автокала. 
Теперь самое главное - написание собственно макроопределений меню: 


* “РЗ 


[Lsp] C°C"P (progn (terpri) (setq lispfile (strcat (setq lispfile (getstring + 
“Input Lisp file name (without extension): “)) “45р”))) 

[File:]°C^C^P (progn (terpri) (setq lispfile (strcat (setq lispfile+ 
(getstring “Input Lisp file name (without extension): “)) “.lsp”))) 
[EDIT:]°C^C^P(progn (if (/= lispfile nil) (ргодп (terpri) (setqlispfile (strcat + 
(заза lispfile (getstring “Input Lisp file name (without extension): “))+ 
“Isp” ))) (command “LEDIT”)) 

[LOAD:]"C^C"P (if (= lispfile nil) (ргодп (terpri) (setq message + 
“Nothing toload: Enter file name first!” ) (terpri) (setq anil)) (progn ({егри)+ 
(load lispfile))^P 


[LIST:]°C^C^P(command “DIR” “*.Isp”) ^Р 


Всего пунктов четыре: Lisp File, EDIT и LOAD. Самый простой из 
них - пункт LOAD, осуществляющий загрузку в Автокад программы на _ 
Автолиспе. Загружается та программа, с которой идет работа в настоя- 
щий, момент. Пункт Lisp File ‘(фактически это один и тот же пункт, 
который активизируется выбором как Lisp, так и File) запоминает 
в строковой переменной lispfile вводимое пользователем имя (без pac- 
ширения) текущего файла Автолиспа. После ввода имени файла. к нему 
подсоединяется расширение -.15р. При выборе пункта меню EDIT авто- 
матически выполняется внешняя команда EDIT, которой передается . 
в качестве параметра имя файла на Автолиспе. 
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В пунктах EDIT и ГОАО нужно предусмотреть проверку имени 
файла на тот случай, если пользователь выберет этот пункт до того, как 
будет задано имя файла. При этом имя файла запрашивается и в ых 
ЕТ, а в-пункте. [ОАР-выдается сообщение об онгибке. 

Описанная выше процедура кажется сложной, однако, один раз ее 
проделав, вы сэкономите себе много времени при работе с Автолиспом. 
В этом и заключается смысл автоматизации пользовательских прило- 
жений. 

Для более удобного ’и эффективного использования Автолиспа 
в меню в 12-й версии Автокада можно разместить Лисп-процедуры, ис-. 
пользуемые в меню, ‘в отдельном файле с расширением .mnl - это делает 
меню более компактным. Имя этого файла ‘должно совпадать с именем 
соответствующего меню. ‘Автокад. автоматически загружает файл .mnl 
при загрузке файла меню (.mnu или .mnX) с таким же именем. 
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Глава 5 


Язык строковых выражений (DIESEL) 


Язык строковых выражений (DIESEL - Direct Interpretively 
Evaluated String Expression Language) можно использовать для формиро- 
вания текстовой строки, которая с помошью системной переменной 
МОБЕМАСКО выводится в статусную строку, или изменять заголовки 
в пунктах меню в.процессе его работы. без редактирования и перезагруз- 
ки. Это достаточно медленный интерпретирующий язык, однако, он Ha- 
дежен и хорошо выполняет свою работу. ОТЕЗЕТ-выражения работают 
со строками - на входе и выходе функций этого языка всегда будут 
строки. | | | 

По сути, с помошью команд языка DIESEL вы, в зависимости от 
хода процесса проектирования, можете вилоизменять заголовки строк 
меню, выволимые на экран; выполняемые при этом команды следует 
изменять при помощи функций Автолиспа. Эти возможности имеются 
только в 12-й версии Автокада. В 10-й версии в статусную строку MOX- 
но было записать информацию с помошью. функции Автолиспа 
СКТЕХТ с указанием опции -1. Эта информация будет присутствовать 
в текстовой строке ло тех пор, пока ее не перепишет сам Автокад, Ha- 
пример при изменении координат точки курсора или имени текущего 
слоя. 


5.1. Строковые функции языка DIESEL 


Признаком ввода ОТЕЗЕГ-выражения служит символ $ (денежная 
единица доллар). Все функции DIESEL начинаются с этого символа. 
Затем следует круглая скобка, в которой псречисляется список, первым 
элементом которого будет имя выполняемой функции.. Длина списка 
ограничивается 10 элементами, т. €. кажлая функция не может иметь 
более 9 параметров. Элементом списка может быть другая DIESEL- 
функция. Превышение числа параметров приведет к выдаче сообщения 
об ошибке. В Автокаде разрешены следующие функции ОТЕЗЕГ-языка: 


$(+, значение1, значение? [, значение3, ..., значение9]} 
Возвращается сумма чисел значение], значение2, ..., значение9. | 


$(-, значение1, значение? [, значениеЗ, ..., значение9]) 
Возвращается результат вычитания чисел из числа значение]! чисел 
значение, ..., значение9. 
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$(*, значение], значение? [, значениеЗ, ..., значение9]) | 
Возвращается произведение- чисел значение[, значение2, значе- 
ние3, ..., значение9. 


$(/, значение1, значение? [, значениез3, ..., значение9]) 
Возвращается результат деления числа значение] на числа значе- 
ниед, ..., значение9. 


$(=, значение1, значение?) 
Если числа значение l и значение? равны, возвращается 1, в против- 
ном случае 0. 


_ $(<, значение], значение2) | 
Если число значение] меныше числа значение2, возвращается ‘1, 
в противном случае 0. | 


$(>, значение1, значение?) — | 
Если число значение] больше числа значение2, возвращается . 1, 
в противном случае 0. 


$(!=, значение1, значение?) 
Если числа значение] и значение? не равны, ‚ возвращается l, 
в противном случае 0. 


$(<=, значение1, значение2) | Had PE | 
Если число значение! меньше или равно числу  значение2, 
возвращается l, в противном случае 0. 


$(>=,. значение], значение2) | 
Если число значение] больше или равно числу  значение2, 
возвращается 1, в противном случае 0. 


$(апа, значение], значение [, значениеЗ, ..., значение9]) | 
Возвращается побитовое логическое произведение целых от 
значение l до значение9. | | | 


$(апо1о$, значение, [режим, точность]) 

Данное значение редактируется как угол в режиме и с точностью, 
определенными для аналогичной Лисп-функции. Если режим И точ- 
ность опущены, текущие значения выбираются по заданным командой 
ЕДИНИЦЫ (UNITS). 


S(edtime, время, представление) 

Дата по юлианскому календарю, определенная временем (например, 
полученным с помощью функции S(getvar, date), редактируется в соот- 
ветствии с представлением. Последнее состоит из строк форматов, кото- 
рые заменяются представлением даты и ‘времени. Символы, не интер- 
претируемые как строка формата. копируются буквально. ` Строки 
форматов приведены ниже. Допустим, что дата и время таковы: | 

Понедельник, 2 сентября 1964 4:53:17.506 
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Формат Вывод Формат Вывод 
D 2 H 4 
DD 02 HH 04 
DDD Пон ММ 53 
DDDD Понедельник 55 17 
M 9 MSEC 506 
MO 09 AM/PM AM 
MON сен am/pm am 
MONTH © се нтября А/Р А 
YY 94 a/p a 
YYY 1994 


$(е4, значение1, 3Hayenne2) 
Если строки значение] и значение? совпадают, возвращается 1, 
в противном случае 0. | 


‚ S(eval, строка) | 
Строка. строка передается в вычислитель ОТЕЗЕГ-выражений, 
и возвращается результат вычисления. 


$(Их, значение) | 
Вещественное значение усекается до целого путем удаления дроб- 
ной части. | 


$(даепу, имя_переменной) 
Возвращается значение переменной среды имя_переменной. Если 
имя_ переменной не определено, возвращается пустая строка. 


$(де№аг, имя_переменной) 
Возвращается значение системной переменной имя_переменной. 
Если имя_переменной не определено, возвращается пустая строка. 


$(Й, выражение, истина [, ложь]) 

Если выражение не равно нулю, вычисляется и возвращается выра- 
жение истина. В противном случае вычисляется и возвращается выра- 
жение ложь. 


$(index, номер, строка) 

Подразумевается, что аргумент строка содержит одно или несколь-. 
ко значений, разделенных запятой. Аргумент номер выбирает одно из 
этих значений для извлечений, начиная с первого элемента с\ номером 
0. Эта функция может использоваться для извлечения значения Х, У 
или Z координат точки, полученной с помощью функции $(getvar), 
а также в приложениях для получения значений, хранящихся в систем- 
ных переменных USERSL1-5. 
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$({тееп) 

Возвращает длину в символах самой длинной строки, которую мо- 
жет вывести.данный монитор. С помошью этой функции можно изме- 
нять формат статусной строки в зависимости от возможностей монито- 
ра. Эта возможность используется только для. конфигурации статусной 
строки с помощью переменной МОРЕМАСКО. 


$(тВ, номер, аргументо [, аргумен71, ..., аргумент7]) 

Вычисляет и возвращает аргумент, выбранный по êro номеру. Если 
номер равен 0, возвращается аргументо и т. д. Следует обратить внима- о. 
ние на разницу между функциями. $(п\) и S(index): S(nth) возвращает 
один из нескольких аргументов функции, в то время как S(index) извле- 
кает одно из значений разделенной запятыми строки, переданной как 
один аргумент. Невыбранные значения не вычисляются. 


$(ог, значение], значение? [, значение3, ..., значение9]) 
Возвращается побитовая, логическая сумма целых от значение! до 
значение. 


$(По$, значение [, режим, точность)]) | 

Данное значение редактируется. как вещественное число в формате, 
указанном режилюм и точностью, определенными для’, аналогичных 
Лисп-функций. Если режим и точность опущены, текущие значения. 


присваиваются с. режимом. И ТОЧНОСТЬЮ, определенными командой 
ЕДИНИНЫ (UNITS). T 


S(strlen, строка} 
Возвращает длину строки в символах. 


$(зи6&1, строка, начало I, длина]) | 

Возвращает подстроку из строки, начиная с символа начало на 
заданное длиной количество символов. Символы в строке нумеруются 
начиная с l. Если длина опущена, возвращается вся оставшаяся часть 
строки. | | 


$(иррег, строка) , 
Возвращается строка, преобразованная в прописные буквы, 


$(хог, значение], значение? [, значениеЗ, ..., значение9]) 
Возвращается побитовое логическое исключающее, ИЛИ целых от 
значение ] до значение9. 


Сообщения об ошибках 


В зависимости от-типа ошибки ОТЕЗЕГ-выражение. вставляет ука- 
зание об ошибке в поток вывода: 
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Сообщение _ Смысл 


$S? Синтаксическая ошибка (пропущена закрывающая 
скобка или незавершенная строка) 

$(функ,??) — Неизвестный аргумент функции функ. 

$(функ)?? — Неизвестная функция функ. 

$(++) Избыточная длина строки вывода - выражение усечено 


5.2. Переменная МОРЕМАСКО 


В 12-й версии за содержание статусной строки отвечает системная 
переменная МОПЕМАСКО. Эта переменная позволяет определить и OT- 
‚ редактировать данные для составления статусной строки в соответствии 
с точной спецификацией пользователя. При запуске Автокада эта пере- 
менная установлена в пустую строку. Она не сохраняется ни в рисунке, 
ни в файле конфигурации, ни где-либо еще. При необходимости зада- 
ния переменной МОРЕМАСКО определенного значения при каждом 
открытии рисунка можно загрузить требуемую установку переменной 
с помощью функции S::STARTUP, определенной в файле acad.lsp. | 

Переменная МОБЕМАСКО определяется пользователем. Ее можно 
установить в любое строковое значение: по длине она ограничена воз- 
можностями Автолиспа, а по размеру - буфером связи Автолисп - Авто- 
кад. Команда УСТПЕРЕМ (ЗЕТУАК) дает возможность -ее установки 
в диалоговом режиме с консоли, хотя при этом ее длина ограничивается 
255 символами. При задании пустой строки (путем ввода символа точка 
`(.) или (“”) из Лисп-программы с помощью функции servar) Автокад 
отображает стандартную статусную строку. 

Для отображения в статусной строке постоянной Во nc- 
пользуется команда УСТПЕРЕМ (SETVAR) функция Автолиспа setvar. 
Для формирования изменяемой в процессе работы содержания статус- 
ной строки в нее следует включать “макровыражения”, используя язык 
DIESEL. 


Примеры статусной строки: _ 
Команда:МООЕМАСВО 


Новое значение МОБЕМАСВО или . если нет <“”>: 
$(getvar, dawgname) Слой: $(getvar, сауег) 


С помощью функции $(getvar, varname) можно получить значение 
любой системной переменной, текущее значение которой заменяет вы- 
ражение в статусной строке. Теперь при переключении слоев перемен- 
ная МОПЕМАСКО переопределяется и, если она изменилась, на экран 
выводится новое имя слоя. 
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Выражения могут быть достаточно сложными и вложенными. 
Например, если требуется отобразить в статусной строке текущее значе- 
ние шага привязки и ее угол в градусах, преобразование угла сетки 
шаговой «привязки из радиан в градусы с отбрасыванием десятичных 
единиц можно осуществить с помощью вложенных выражений: 


Команда:МОБЕМАСАО 
Новое значение МОБЕМАСВО или . если нет <“”>; Шаг: $(getvar, зпарипй) 
$(Ях,$(*,$(де\уаг, зпарапд),$(/,180,3.14159))) 


Еще лучше отобразить значения.в текущих форматах для линейных 
и угловых единиц измерения: 


Команда:МОБЕМАСВАО 

Новое значение МОПЕМАСВО или . если нет <“”>: Шаг: 
$(Поз,$(таех,0,$(де!маг, зпариой))),$(Цоз,$(тдех,1,$(демаг, зпарипй))) 
$(angtos,$(getvar,snapang)) 


Введенные данные DIESEL копирует непосредственно на вывод, 
‚ пока не встретится символ $ или строку в кавычках. Строки в кавычках 
можно использовать лля подавления вычисления последовательности. 
символов (без кавычек они рассматривались как. РЛЕЗЕТ-функции). 
При использовании кавычек в тексте строки их вводят дважды (*^). 

Если текущий слой - “ФУНДАМЕНТ” и выполнена команда 
Команда: МОБЕМАСВО 


Новое значение МООЕМАСВО или. если нет <“”>: “$(демаг, dwgname)=""$(getvar, 
clayer)”” 


TO в статусной строке будет написано 
$(де\маг,сауег)=“ФУНДАМЕНТ”` 


Определение МОРЕМАСКО в Автолиспе 


Для формирования строки, передаваемой в системную переменную 
МОПЕМАСКО. можно использовать Автолисп. 


Пример: 


(defun С:ЗТАТИМЕ () 
(setvar “тодетасго” 

(strcat "layer $(subsrtr,$(getvar,clayer}, 1,8)” 
“$(if,$(getvar,orthomode), ORTHO)” 
“$(if,${getvar,snapmode), SNAP)” 
“$(if,$(getvar,tabmode), TEMPLET)” 
“$(if,$(=,tilemode), 0),$(if,$(=,$(getvar,svport),1),L))” 
) 


При выполнении этой программы будет создаваться статусная 
строка, аналогичная стандартной. 
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5.3.  ОЕЗЕ-выражения 


Строковые выражения на языке DIESEL можно применять в фай- 
лах меню и использовать как дополнительный способ создания макро- 
сов. Эти выражения могут возвращать строковые значения в ответ на 
стандартные команды Автокада, Лисп- и СРП-процедуры и другие Mak- 
роопределения меню. Можно изменять види содержимое заголовков 
меню. При использовании в пунктах меню ОТЕЗЕГ-выражений необхо- 
AMMO соблюдать формат “Зраздел=субменю”, где Ураздел - пункт меню, 
субменю - требуемое ОТЕЗЕГ-выражение. Часто применение макросов 
меню проще и яснее, чем использование Автолиспа, но не всегда. | 


Примеры использования DIESEL и Лиспа: 
`ОТЕЗЕТ-выражение 


(Лист/Модель]`С`С^Р$м=$(#,$(де{аг,сурой), 1), _глзрасе, _рзрасе) 
Лисп-выражение | 


[Лист/Модель]^С7С”Р(Й(=(деуаг “суройП”)1)(соттайа “_МЗРАСЕ”)+ 
(сотилапа”_РЗРАСЕ”))(рйпс) 

Оба пункта меню позволяют переключаться из пространства листа 
в пространство модели, но ОТЕ$ЕГ-выражение короче и выполняется 
“прозрачно”, не требуя вызова Лисп-функции (princ). Если ^P пропу- 
щена в обоих случаях, ПОТЕЗЕТ-выражение будет отображать только 
введенную команду, в то время как Лисп-выражение Te отображать 
всю строку Автокала. 

Если необходимо изменять заголовок в падающем меню, первым 
символом заголовка должен быть символ “$”: 


[$(еуа!,”Сиггег{ layer: “$(getvar,clayer))] 


В этом случае заголовок пункта будет изменяться при изменении 
текущего слоя. 

Еще один пример, в котором используется ПТЕЗЕ-выражение 
одновременно для заголовка и части пункта меню, - практичный способ 
ввода текущих значений даты в рисунок: | 
[$(edtime,$(getvar,date), DDD”, “D МОМ УУУ\]^С^С деж \\\+ 
`$М=$(едите, $(getvar,date), DDD”, “D MON YYYY); 


Для отключения заголовка падающего меню ERASE (СОТРИ) 
во время действия команды можно использовать следующую строку: 


[$(И, $(getvar,cmdactive);-)ERASE]_erase 


Аналогично можно изменять пометку возле пункта падающего 
меню. | 


152 


О/Е$Е[-выражения в Автолиспе 


В Лисп-процедурах ОТЕ$ЕЁ-выражения можно использовать с MO- 
мощью вызова Лисп-функции menucmd. Формат. аналогичен формату 
ОТЕ$ЗЕ[-выражений в заголовках меню. 


Пример фрагмента кода установки переменной с_Ите, равной текущему 
времени: 


(setq c_time (теписта “М=$(еайте, $ (деуаг, да{е),НН:ММ а/р)”)) 


Для проверки возможностей языка DIESEL можно использовать, 
к примеру, вот такую программу на Автолиспе: 


(defun C:DIESEL( /dsl) 
(while (/= dst “М=“) | | 
(setq dsl (strcat “М=“(даз ито T “\nDIESEL: “))). 
(princ(menucmd dsl)) 


) 


(princ) 


| Отладка Г/Е$Е!-выражений - МАСРОТКАСЕ 


Данная системная переменная используется для отладки DIESEL- 
выражений. Обычно она отключена (установлена в нуль). При ‘ве 
включении вычисление всех ОТЕЗЕГ-выражений отображается в зоне 
подсказок, включая вычислёние выражений в меню и статусной строке. 
Для устранения некоторых недоразумений в режиме отладки DIESEL- 
выражений переменную МООЕМАСКО установите в пустую строку, 
поскольку она будет тоже вычисляться и выводиться B зону подсказок. 
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Глава 6. 


Пакетные файлы и слайды 


6.]. Пакеты команд 


Эволюция Автокада от самых первых версий до последней, двена- 
днатой тесным образом коснулась принципов программированного CO- 
ставления чертежей. На первых ‘этапах методика формирования гра- 
фического файла была простой и незатейливой: составлялся текстовый 
файл с перечнем команл и опций Автокада, который последовательно 
выполнялся при загрузке или при вызове команды ПАКЕТ (SCRIPT). 
Такой пакетный файл созлавался вне системы Автокада в А$СП-форма- 
те с помошью текстового редактора или текстового процессора. Этот 
файл имел расширение .5сг. Данная методика получила весьма широкое 
распространение и, несмотря на широкие возможности Автолиспа 
и СРП-приложений в 12-й версии, в силу необходимости преемствен- 
ности снизу вверх сохранилась до сих пор. 

Итак, пакст команд позволяет считывать команды из текстового 
файла и выполнять заранее подготовленную последовательность команд 
Автокада. Пакет может быть вызван на исполнение с помошью специ- 
альной формы команды acad (при запуске) или с помошью команды 
ПАКЕТ (SCRIPT). С помощью этого средства можно создавать HHK- 
лические демонстрации, составленные из сменяющихся изображений 
так называемых слайдов - моментальных фотографий графического эк- 
рана Автокада, полученных с помошью команды ДСЛАЙД (MSLIDE). 
В пакетные файлы можно включать комментарии для пояснения содер- 
жания и других замечаний. Любая строка, начинающаяся с точки с за- 
пятой (;), воспринимается как комментарий и игнорируется Автокалом 
при обработке пакетного файла. 

В 12-й версии при вводе команд из пакета системные переменные 
PICKADD и Р!СКАПТО должны быть равны соответственно единице и 
нулю. Это позволяет обеспечивать совместимость с предылущими вер- 
сиями и упрощает адаптацию. 


6.2. Вызов пакета при запуске Автокада 


Для вызова пакета при запуске Автокада используется командная 
строка 
дисковод>асаЯ имя_рисунка пакетный_файл 
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Пакетный файл должен быть вторым файлом, указанным в команд- 
ной строке вызова Автокада. При этом подразумевается, что он имеет 
расширение .5сг. Если Автокад не может найти пакетный файл с указан- 
ным. именем, на экране появляется соответствующее сообщение и для 
продолжения работы нужно нажать клавишу Enter. 

Примером пакетного ‘файла для 10-й версии Автокада может слу- 
жить следующий файл: 

i 

home 

Grid on 

Ltscale 3.0 

Layer $ 0 color red 0 


Если данную последовательность команд записать в файл с именем 
box.scr, то его можно вызвать следующим образом: 


дисковод>асаа x box 


В пакетном файле задано имя рисунка (“home”), и имя рисунка по 
умолчанию “X”, заданное в строке вызова “acad”, будет проигнорирова- 
но. Пакет создаст чертеж “Поше”, устанавливает режим включенной 
сетки, задает масштаб типа линий 3.0, устанавливает слой “0” текущим 
и присваивает ему красный цвет. Затем Автокад переходит в режим ри- 
сования, приглашая вас K вводу команд. 

В 12-й версии первые две строки пакетного ‘файла не нужны. Если 
они присутствуют, Автокад 12-й версии воспринимает их как требова- 
ние пакета вызвать соответствующий пункт главного меню и реагирует 

нужным образом. 

Однако правильная работа пакетных В зависит от соответст- 
вующих последовательностей запросов команд Автокала 12. При работе 
с пакетами, разработанными для старых версий, следует учесть, что: 

è пакеты, обращающиеся ‘к пунктам главного меню (новый), 
2(открой), 7(комниляция), $(преобразование старого рисунка), 
9(восстановление испорченного рисунка - для 11-й версии), co- 
вместимы с версией 12 и не требуют изменений; 

è пакеты, обращающиеся к пункту главного меню 3(черчение), не co- 
ответствуют последовательности запросов команды ЧЕРТИ (PLOT) 
версии 12 и не будут работать правильно; то же относится и к за- 
просам пункта 4(печать) главного меню; 

è пакеты, обрашающиеся к пункту главного меню 5(настройка), 
могут потребовать изменений для обсспечения соответствия после- 
довательности запросов версии 12. 


В 12-й версии имеется возможность использования пакета для сво- 
бодного черчения или для изменения конфигурации Автокада. Для это- 
го используются следующие форматы команд: 


дисковод>асад -p имя_пакета 
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для свободного черчения; 
дисковод>асаа -r имя_чертежа имя_пакета 
для изменения конфигурации. 


6.3. Вызов пакета из Автокада 


Команда ПАКЕТ (SCRIPT) 


_ Для запуска пакета непосредственно из графического редактора Hc- 
пользуется команла ПАКЕТ (SCRIPT). В. ответ на запрос Автокалда cie- 
дует ввести имя пакетного файла или нажать клавишу Enter для приня- 
тия имени текущего рисунка по умолчанию. Предполагается, что файл 
имеет стандартное расширение ›.5ст; не следует включать его в ответ. 
Сначала выполняется последовательность команд из пакетного файла, 
а затем появляется подсказка Команда: (Сопитлапа:). Если из пакетного 
_ файла считывается команда ПАКЕТ (SCRIPT), то работа с тскущим na- 
кетом прекращается и файл, заданный в*данной команле, становится TC- 
кущим пакетным файлом. Для ограничения запросов в пакете можно 
использовать системную переменную EXPERT. Поскольку она влияет 
на все выдаваемые Автокадом запросы, ее можно устанавливать прямо 
в пакете. 


Команда ЗАДЕРЖИ (DELAY) 


При использовании пакетов в демонстрационных целях иногда 
требуется задержать получаемое изображениё для того; чтобы зритель 
_ мог успеть ‘рассмотреть и осмыслить изображение на экране. Данная 
‚команда обеспечивает создание паузы между различными операциями о 
Автокада. 

Формат команды: - 


Команда: ЗАДЕРЖИ | 
Задержка в миллисекундах: число 


Заданное число определяет длительность паузы. Чем больше число, 
тем больше пауза. Ввиду широкого диапазона скоростей обработки 
в компьютерных системах, довольно сложно дать точное определение 
времени задержки, однако шаг задержки должен составлять около 
1 миллисекунды. Наибольшая задержка составляет 32767 (около полу- 
минуты). 
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Команда ПРОДОЛЖИ (RESUME) 


Если выполнение пакета было прервано, например, нажатием ком- 
бинации клавиш Ctrl+C или Backspace, то выполнение пакета .с места 
прерывания можно продолжить этой командой. 

Формат команды: 

Команда: ПРОДОЛЖИ 
Command: RESUME 

Ошибка выполнения какой-либо команды пакета приведет K его 
прерыванию; если ошибка произойдет во время работы Автокада, то для 
продолжения также используется эта команда. Для продолжения вы- 
полнения пакета при ошибке внутри комады, . выполняемой в пакете, 
команда ПРОДОЛЖИ вводится в аа режиме, T. €. с апост- 
рофом. 


Команды ГРАФЭКР (СРАРН$СК) и ТЕКСТЭКР [TEXTSCR) 


Некоторые команды Автокада (например, СПИСОК и СТАТУС) 
автоматически персключают экран в текстовый режим в одномонитор- 
ных режимах. Для возвращения в графический режим при выполнении 
пакета можно выполнить команду ГРАФЭКР (СКАРН$ФСК). Для nepe- 
хода в текстовый режим используется команда ТЕКСТЭКР (ТЕХТЗСК). 
В двухмониторных системах эти команды игнорируются. 


Команда ВПАКЕТ (RSCRIPT) - циклические пакеты 


В ряле случаев (при коммерческих демонстрациях, на выставках 
ит. д.) весьма удобны пакеты, завязанные в петлю, т. €. повторяющиеся 
неограниченное число раз. Для изготовления такого пакетного файла 
в него надо вставить в качестве последней команды команду ВПАКЕТ - 
возобнови пакет (RSCRIPT). `В этом случае он будет вызываться по- 
вторна. 


Пример: 


РЕГЕН Регенерация рисунка 

ТЕКСТ 3,2 5.0 0 — Начальные установки для ввода текста 
АО “ДИАЛОГ-МИФИ” ВАС ПРИВЕТСТВУЕТ! | 
Задержи 2000 Задержка на 2 сек. 


СОТРИ П Стирание текста 
Пробел для завершения выбора объектов 
ВПАКЕТ Перезапуск пакета. 
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Автолисп в пакетах 


Пакетные файлы появились в ранних версиях Автокала, когда они 
были единственным средством программирования. Развитие Автокада 
привело к тому, что можно обходиться и без них. Однако ив 12-й Bep- 
сии, не говоря уже о 10-й и 11-й, есть смысл их использовать в раз- 
личных приложениях. Возникает вопрос о. возможности использования 
Автолиспа в пакетных файлах. Ответ здесь положительный - по сути, 
строка пакетного файла моделирует ввод какого-то текста в командную 
строку непосредственно. Если в строке файла поставить на первом мес- 
те открывающую скобку, то она интерпретируется как начало строки 
Автолиспа. Таким образом мы. можем писать программы на Автолиспе 
и в пакетных файлах. Конечно, это более медленный способ ввода про- 
грамм, но отдельные команды, например команды загрузки тех или 
иных Лисп-программ, можно очень эффектно использовать. Команд- 
ные строки или ВАТ-файлы, содержащие запуск и выполнение EXE- 
модулей пользователя, позволяют вписать Автокад в более глобальную 
систему обработки информации, передавая промежуточную информа- 


° цию через текстовые файлы. В 11-й и. 12-й версиях сразу можно писать 


приложения на языке Си, но, как это часто бывает, большое количество 


‘ранее разработанных программ не хочется переделывать и выбрасывать 


и остается только один путь - использовать пакстные файлы в сочета- 
нии с программами пользователя и командными файлами для разработ- 
ки комплексов обработки информации, в которые Автокад входит как 
одна из составляющих. | 


6.4. ‘Использование слайдов 


В Автокаде слайл представляет собой файл, содержаший “момен- 
тальный снимок” изображения на графическом мониторе. Для по- 


- лучения требуемого изображения можно использовать любые команды 


Автокада и затем сделать слайд. Слайды можно использовать в гра- 
фических меню и диалоговых окнах, можно вызывать для просмотра на 
экране Автокада, компоновать презентационные диафильмы с помощью 
пакетного файла или с использованием проектора ANIMATOR. 


Команда ДСЛАЙД {MSLIDE) - создание слайда 


Эта команда позволяет создать слайд из примитивов, вилимых на. 
текущем видовом экране. Если в данный момент вы работаете в про- 
странстве модели, создается слайд только текущего видового экрана. 


158 


J 


Итак, сначала создается изображение, затем кадрируется на весь видо- 
вой экран, затем выполняется команда 


Команда: ДСЛАЙД 
Command: МЗЦОЕ 


Нужно задать имя слайда, после чего. создается. файл с указанным 
именем и раснгирением .54. По ходу создания слайла производится 
“перерисовка” изображения, и за заданным процессом можно следить. 
В слайд не включаются те части рисунка, которые находятся BHE экрана 
либо на отключенных или замороженных слоях. 

При создании слайдов с тонированных изображений при болыном 
размере видового экрана или на мониторах с высоким разрешением 
возможно появление черных линий по контурам объекта. Чтобы nc- 
ключить побочный эффект при создании слайдов тонированных изо- 
бражений, нужно использовать всю графическую зону экрана монитора 
с высоким разрешением. | 


Команда СЛАИД [VSLIDE) - просмотр слайда 


При необходимости просмотра слайда задается команда 
Команда: СЛАЙД 
Command: VSUDE 


Далее в’ 12-Й версии выводится стандартное диалоговое окно 
файлов или в строке подсказок появляется запрос 


Слайд-файл <по умолчанию>: 


Имя текущего рисунка предполагается по умолчанию. Если файл 
содержится в библиотеке (имя_библиотеки.$), используется формат 


имя_библиотеки(имя_слайда) 


и на текущем видовом экране появляется записанный ранее слайд. Вос- 
становление текущего рисунка на мониторе обеспечивается командой 
ОСВЕЖИ (REDRAW). | 


Библиотеки слайдов 


Из набора слайд-файлов можно создавать библиотеки слайдов, MC- 
пользуя дополнительную сервисную программу SLIDELIB, расположен- 
ную в каталоге support пакета Автокад. Для создания библиотеки слай- 
дов в командной строке операционной системы вводится команда 


дисковод>51ае имя_библиотеки [<список слайдов] 


slidelib считывает список имен слайд-файлов из стандартного кана- 
ла ввода. Обычно это делается переназначением стандартного канала 
ввода на файл, содержащий список слайд-файлов (по одному на строку 
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в файле, подготовленном с помощью какого-либо текстового редакто- 
ра). Подготовленная библиотека записывается в файл с именем, задан- 
ным в поле имя_библиотеки с расширением .55: Файлы, указанные 
в поле список слайдов, могут задаваться без расширения. Не следует 
удалять исходные файлы слайдов. Программа slidelib не гюзволяет 
‘обновлять библиотеку слайдов после. ее создания. При необходимости 
добавить слайд: в библиотеку или удалить из нее слайд следует изменить 
файл списка слайдов и повторить создание библиотеки. Размер библио- 
TEKH приблизительно равен сумме; размеров содержащихся в ней фай- 
лов. Однако операционная система.отводит. под каждый файл на диске 
больше места, чем размер информации в файле, и, если размеры 
файлов небольшие, можно получить значительную экономию ИСКОВОЙ 
памяти. 


‚ Показ слайдов 


Показать один слайл на текущем видовом экране можно при MOMO- 
щи команды СЛАЙД (VSLIDE). Если возникает необходимость показа 
демонстрации слайд-фильма, используется комбинация пакета с коман- 
дой СЛАЙД. Скорость воспроизведения слайдов на мониторе обычно 
ограничена временем доступа к диску, которое требуется для считыва- 
ния слайд-файла. Можно, однако, предварительно загрузить следующий 
слайд с диска в оперативную память за то время, пока рассматривается 
предыдущий файл. а затем быстро вывести этот. слайд на экран из NAMA- 
ти. Для предварительной загрузки слайла необходимо’ перед именем 
слайда в команде СЛАЙД поставить звездочку. Следующая команда 
СЛАЙД учтет, что слайд был предварительно загружен, и выдаст его на 
экран не спрашивая имени файла. 


Пример: 


СЛАЙД. SLIDE1 
СЛАЙД *ЗЦОЕ? 
ЗАДЕРЖИ 2000 
СЛАЙД 

СЛАЙД *SLIDE3 
_ ЗАДЕРЖИ 2000 
СЛАЙД | 
ЗАДЕРЖИ 3000 
ВПАКЕТ 

МЗНОЕ SLIDE1 
VSLIDE *SLIDE2 
DELAY 2000 
VSLIDE 

СЛАЙД *SLIDE3 
DELAY 2000 
VSUDE 
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DELAY 3000 
RSCRIPT 


Последующий слайд загружается в память во время просмотра Te- 


кущего слайда. Кроме того, используются дополнительные задержки по 
времени. | 


При 


Как мы видим, слайды - это специфическое средство Автокада. 
использовании слайдов следует руководствоваться следующими 


правилами: 


Слайды нельзя редактировать. Если во время показа слайла выпол- 
няются команды изменения рисунка (например, что-либо рисуется 
или редактируется), то они влияют не на слайд, а на текуший yep- 
теж, который не виден. Поэтому во время показа слайда рекомен- 
дуется использовать только команды СЛАЙД (VSLIDE), ЗАДЕРЖИ 
(DELAY), ОСВЕЖИ (REDRAW), причем последняя команла воз- 
вращает текущий рисунок на экран. 

Для изменения слайда следует сначала отредактировать рисунок, 
с которого был сделан слайд, затем сделать новый слайл. 

Слои, цвета, увеличение масштаба изображения и другие парамет- 
ры во время просмотра слайда не оказывают никакого воздействия 
на вид этого слайда. 

Если при созлании слайда использовался radlici монитор 


с низкой разрешающей способностью, а во’ время просмотра - MO- 


нитор с высокой разрешающей способностью, то такой слайд все 
же можно просмотреть: Автокал соответствующим образом откор- 
ректирует образ. Однако этот слайд не будет использовать всех пре- 
имуществ до тех пор, пока он не будет переделан с исходного 
рисунка на мониторе с высоким разрешением. | 
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Глава 7 


Приложения для.Автокада 


(Открытость системы Автокада широко используется для создания 
специализированных пакетов, используемых в различных приложениях, 
предназначенных для решения конкретных задач проектирования. | 

Широкой известностью пользуются программные продукты фирмы 
Softdesk для выполнения работ в архитектуре, гражданском и промыш- 
ленном строительстве, картографии, машиностроении. Пакеты этой 
фирмы выполнены по модульному принципу, позволяющему каждому 
пользователю создавать свою среду проектирования. 


7.1. Архитектура и строительство 


Модули архитектурного проектирования представляют собой от- 
дельные оверлейные структуры; которые позволяют выполнять’ опреде- 
ленные построения и решать заданный круг залач: 

e Базовый модуль (Architectural Base) 

представляет собой набор инструментов для эскизного архитсктур- 

ного просктирования. Он необходим для работы всех остальных 

приложений. E 

e Архитсктурный модуль (Auto-Architect) 

являстся высокопроизводительным пакетом для профессионального 

архитектора, который содержит все необходимое для сквозного 

проектирования зданий практически любого типа. Инструментарий 
этого модуля позволяет формировать полный комплект докумеита- 
ции на выполненный проект. Обеспечиваются дюймовые и MCT- 

_рические станларты. Стандартное разнесение различных элементов 
по слоям поддерживается через диалоговые окна Автокада. Имеется 
значительное количество разных типов стен, потолочных перскры- 
тий, дверей и окон, лестниц, кровель. Неограниченные возмож- 
ности редактирования этих элементов позволяют создавать свои 
библиотеки. 

èe Инструментальный (Productivity Tools) модуль 

позволяет увеличить скорость разработки проекта за счет использо- 

вания высокопроизводительного текстового редактора, электронных 

таблиц и калькулятора. Его можно использовать в среде Автокада 
отдельно или с другими модулями фирмы Softdesk. 
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e Модуль вентиляционного оборудования (HVAC) 
представляет инструментарий для планировки отопления, вентиля- 
ции и систем кондиционирования воздуха. Создаваемые планы 
и диаграммы управления удовлетворяют самым современным тре- 
бованиям стандартов по охране окружающей среды. Модуль рабо- 
тает совместно с архитектурным и инструментальным модулями. 

èe Модуль электрооборудования (Electric) | 
содержит набор символов, программных средств для разработки 
схем электроосвешения, сигнализации и связи, силовых и противо- 
пожарных. Модуль полностью интегрирован с архитектурным и ин- 
струментальным модулями. | 

èe Модуль проектирования водопровода и. канализации (Plumbing) 
позволяет разрабатывать планы водопровода, канализации и диа- 
грамм управления. Модуль полностью интегрирован с архитектур- 
ным и инструментальным модулями. Содержит большое количест- 
во соответствующих символов. 

e Модуль деталей (Details) 
представляет собой набор средств для формирования специфика- 
ций деталей и сборочных единиц. С помощью этого модуля можно 
формировать свои каталоги деталей, используемых в архитектуре; 
гражланском строительстве, машиностроении. Может использо- 
ваться как совместно,с предыдущими модулями, так и только с AB- 
токалом. | 


7.2. Машиностроение 


Комплекс программных пролуктов Genius 12 является удобным 
‚средством для проектирования изделий машиностроения в среде Авто-. 
кала. В нем содержится большое количество дополнительных команд, 
непосредственно ориентированных на конструктора-разработчика, ши- 
рокий выбор стандартных элементов конструкций и деталей (крепеж 
различного сортамента, опоры врашения, муфты, зубчатые колеса, 
фланцы и пр.). Управление процессом проектирования осуществляется 
через планшетное меню со сменными вкладышами. Каждый из модулей 
комплекса мажет быть адаптирован пол нужды конкретного производст- 
ва, парка станочного оборудования, действующие стандарты. Проекти- 
рование можно вести как на плоскости обычным образом, TAK H в объе- 
ме. Требуемые расчеты можно выполнять непосредственно в среде 
Автокада и формировать пояснительную записку либо в отдельном тек- 
стовом, файле, либо в файле Автокада. | | 
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Послесловие _ 


Ко времени выхода книжки в свет вышел Автокад 13-й версии. Его 
достоинства, особенности и привлекательность для пользователя еще 
требуют серьезного рассмотрения и исследования. Заранее не хочется 
делать какие-то выводы, однако, если вы хотите с ним познакомиться 
поближе с целью приобретения, свяжитесь с автором,и вы получите 
подробную информацию. 13-я версия работает в среде DOS, 
WINDOWS, WINDOWS МТ. Ресурсы для работы 13 Автокала требуются 
более серьезные - 16 Мбайт для ДОС и 20 МБ для WINDOWS. В ско- 
ром времени Автокад 13-й версии появится и на других платформах. 

Основные отличия И ро от предыдущих заключаются в сле- 
дующем: 

e команлу PURGE (Удали) ‘можно выполнить на любой стадии ре- 
дактирования рисунка; 

e при загрузке существующего чертежа в диалоговом окне можно 
просмотреть его вид;* 

e расчленить на составляющие можно любые блоки, вставленные 
с разными масштабами по осям; 

e лля Автокада в среде Windows имеется расширенная контекстная 
ПОМОЩЬ; | 

èe документация по всему пакету поставляется как в печатном виде 
изящно изданных более компактных книг, так и в электронном на- 
боре гипертекстов, работающих в среде Windows; 

è TCKCTOBbIC СОСТавляющие чертежа могут объединяться в параграфы, 
которые вставляются, редактируются и форматируются как единое 
целос; 

èe введена проверка орфографии для текста, к сожалению только анг- 
лоязычного; 

è можно использовать как в DOS- варианте, так и B \УАпасуз варианте 
шрифты Тме-уре в контурном и закрашенном виде; 

è при простановке размеров можно вводить как величины отклоне- 
ний размеров, так и использовать допуски отклонения формы, 
причем в разных стандартах; P 

è размерные стили получили дальнейшее усовершенствование - их 
можно вводить для разных типов размеров по группам; 

è выноски стали ассоциативными M редактируются из команды DIM 
(РАЗМЕР); 

e ДЛЯ каждой выноски можно составить. аннотацию, редактируемую 
через диалоговое окно с подключением внешнего редактора; 
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è штриховка стала ассоциативной, и при изменении ее контуров она 
изменяется автоматически; введена новая команда редактирования 
штриховки, позволяющая изменять ее свойства через диалоговое 
окно; 

© введены новые примитивы: эллипс, который заменил полилиней- 
ный квазиэллийс, сплайн, множественная линия, конструктивная 
линия, не имеющая ограничений по длине, луч - конструктивная 
линия, исходящая из точки в одну сторону; 

» введены новые типы объектной привязки: пересечение продолже- 
ния, кажущееся пересечение примитивов, и в разных плос- 
костях, и привязка через ссылочную точку; 

® команды EXTEND, ГЕМТНЕМ и TRIM работают не только с фак- 
тическими границами, но и с продолжениями примитивов; 

® введены новые типы линий, содержащих символы или текстовые 

_ надписи; 

e твердые тела стали примитивами Автокада, и к ним можно приме- 
нять большинство команд редактирования; 

e формат чертежа изменился, однако предусмотрена возможность 
экспорта в формате 12-й версии; экспортировать чертеж можно 
и в формате пакета 3D STUDIO, как, Впрочем; и импортировать 
чертежи из этого пакета; чертежи предыдущих версий при загрузке 
‚ конвертируются автоматически; 

è в системе создания реалистичных изображений появились цветные 
источники света, источники света с ограниченным световым ко- 
нусом; 

e K каждому комплекту Автокада придается АДМ версии 2.0. ко- 
торый приближает процедуру и результат оттенения к работе пакета 
3D-STUDIO. | | 


Конечно, на этом отличия не заканчиваются. Возможности 13-й 
версии значительно щире. Это и новый драйвер дисплеев с питрокой 
палитрой выбора’ иветовых гамм и разрешений, да еще и с дополнитель- 
ными функциями зумирования типа “птичий глаз”, новые драйверы 
принтеров-плоттеров и дигитайзеров. Вариант, работающий в среде 
Windows, позволяет широко пользоваться механизмами обмена и редак- 
тирования, специфическими wia, Windows. Кроме этого для этого вари- 
анта имеются свои новые возможности, например система частичных 
меню, пПодгружаемых по мере необходимости, встроенный курс 
обу"ения основам Автокада, документация в гипертекстовом режиме 
и пр. Мы не ставим своей целью‘полностью описать Автокад 13 (это 6y- 
дет, мы надеемся, следующая книга), однако уже сейчас можно сказать, 
что фирма Autodesk развивает свой самый известный в мире продукт 
весьма успешно. | 
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Приложение А 


Системные переменные Автокада 


Ниже‘ перечислены ‘системные переменные Автокада. Системные 
переменные содержат информацию о настройках различных режимов 
Автокада и некоторую дополнительную информацию. Системные nepe- 
менные можно считывать и изменять (если переменная не помечена 
“только для чтения") при помощи команды ЗЕТУАК (УСТПЕРЕМ) или 
из Автолиспа (getvar и setvar). В 12-й версии Автокада системную nepe- 
менную можно вызвать, просто указав ее имя на подсказку "Команда". 
Системные переменные могут быть целого, вещественного, строкового 
типа или списком (тип кажлой переменной указан в таблице). Боль- 
шинство системных переменных Автокада записываются в файл uepre- 
жа. Если переменная записывается в файл конфигурации acad.cfg или 
вообще не сохраняется, это оговаривается особо. 


ACADPREFICS | 


Строковая. DE 

Содержит имя каталога, в котором Автокад будет искать вспомога- 
тельные файлы, если они не будут найдены в текущем каталоге (файлы 
прототипов, шрифтов, меню, программ Автолиспа и вставляемых ри- 
сунков). Если, например, вы работасте с проектом МИУМ_1, настройки 
которого хранятся в каталоге ОЛАСАВ\МОМ_1, то перед загрузкой 
Автокала из каталога, скажем, WORK следует поместить -B командный 
файл запуска Автокала строку 
SET АСАО=О:\АСАБ\МИМ_1 
и переменная ACADPREFIX получит значение 


“ОЛАСАБ\МИМ_1" 
Только для чтения. Не сохраняется. 


 ACADVER 


Строковая. 

Содержит номер версии Автокада, который может принимать 
значение 10, 11, 12 или 10а, lla, 12а. Эта переменная не идентична пс- 
ременной ЗАСАОУЕК заголовка ОХЕ-файла, в которой содержится 
номер уровня базы данных рисунка. 

Только для чтения. 
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AFLAGS 


Целая. 

Биты этой переменной определяют флаги режимов. создания ат- 
рибутов командой АТТРЕЕ (АТОПР). Числа, приведенные ниже, уста- 
навливают соответствующие биты этой переменной. Для. установки 
нескольких битов следует записать сумму нужных чисел в AFLAGS: 

| — Invisible (Скрытый), 

2 Constant (Постоянный), 

4 — Verify (Контролирусмый), 

$ Preset (Установленный). 


Не сохраняется. 


АМСВАЗЕ 


Вещественная. 
Направление угла 0° в текущей ПСК. 


ANGDIR 


Целая. 

Направление отсчета углов в текущей ПСК: 
-l . по часовой стрелке, 

0 против часовой стрелки. 


APERTURE 


Целая. 
Высота прицела объектной привязки в пикселах. Записывается 
в файл конфигурации. 


AREA 


Вещественная. | 
| Значение площади, вычисленной с помощью команд AREA 
(ПЛОЩАДЬ), LIST (СПИСОК) или РВЫ$Т (БДСПИСОК). 

Только для чтения. Не сохраняется. 


ATTDIA 


Целая. | | | 

Способ ввода значений атрибутов командой INSERT (ВСТАВЬ}: 
| через диалоговое окно, 

0 с командной строки. 
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ATTMODE 

Целая. 

Режим. отображения атрибутов: 

0 - все атрибуты невидимы, 

1 — видимость определяется флагами, 
2 — видимы даже скрытые атрибуты. 


АТТКЕЫ 


Целая. | 
Режим присвоения значений атрибутам при вставке командой 


INSERT (ВСТАВЬ): 


0 ввод запрещен (берутся значения по умолчанию), 


| разрешается ввод значений в командной строке или через 


диалоговое окно. 


AUDITCTI 


Целая. 

Управляет созданием файла отчета о проверке .adf: 
0 файл отчета о проверке не создается, 

| включает запись АОТ-файла отчета о проверке. 


AUNITS 


Целая. 
Угловые единицы измерения: ° 


0 десятичные градусы, 

|  гралусы/минуты/секунды, 

2  гралы, 

3  радианы, 

4 — топографические. единицы. 

AUPREC 

Целая. ’ 

Количество всех десятичных разрядов при отображении значений 
углов. | 

AXISMODE 
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Целая. 10-я и 11-я версии. 
Отображение осей: 


| оси включены, 
0 оси отключены. 


AXISUNIT 


Список из двух действительных чисел. 10-я и 11-я версии. 


Цена деления в условных единицах разметки осей Х и У (команда 
AXIS (ОСИ)). 


BACKZ 


Вещественная. 

Задает смещение задней секущей плоскости для текущего видового 
экрана в условных единицах. Определена только в том случае, если 
включен бит "заднего сечения" переменной УТЕМ/МОПЕ. Расстояние ло. 
задней секушей плоскости от камеры может быть найдено вычитанием 
_ переменной ВАСКИ из расстояния от камеры до цели. 

Только для чтения. 


ВИРМОРЕ 


Целая. 


Отрисовка маркеров: 
] включена, 


0 отключена. : 


СРАТЕ 


Вещественная. 
Календарная дата/время ее формат OC UNIX). 
Только для чтения. 


CECOLOR | 


Строковая. 
Текущий цвет. 
Только для чтения. 


СЕГТУРЕ 


Строковая. 
Текущий тип линии. 
Только для чтения. 
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СНАМЕЕКА 


Вещественная. | 
Длина первой фаски. 


СНАМЕЕКЮВ 


Вешественная. 
Длина второй фаски. 


CIRCLERAD 


Вещественная. Для 12-й версии. 
Устанавливает радиус по умолчанию для кругов. При вводе 


0 радиус по умолчанию не предполагается. 


CLAYER 


Строковая. 
Текущий слой. 
Только для чтения. 


CMDDIA 


Вешественная. Для 12-й версии. 

В конфигурацию: 

l использовать в команде ЧЕРТИ (PLOT) диалоговые окна, 
0 не использовать. 


СМВАСПУЕ 


Целая. Для 12-й версии. 
Битовый © код, определяющий, действует обычная и/или 


"прозрачная" команда, пакет или диалоговое окно. Является суммой 


следующего: 
| _ действует обычная команда, 
2 действует обычная и "прозрачная" команда, 
4 действует пакет, 
$ _ действует диалоговое окно. 
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Только для чтения. 


СМБЕСНО 


Целая. 

Отображение текста программы при выполнении функции Авто- 
лиспа: 

| не подавляется, 

0 подавляется ("тихий" режим). 


Не сохраняется. 


СМОМАМЕ$ 


Строковая. Для 12-й версии. 
Отображает английское имя действующей команды (и "прозрачной" 
команды, если есть). Например, 


LINE'ZOOM 


COORDS 


Целая. | 
Режим отображения координат в строке состояний (устанавли- 
вается клавишей "F6"): 
0 — отображаются только координаты точки указания, » 
| отображаются текущие абсолютные координаты перекрестья, 
2 — при запросе угла или расстояния отображаются угол и расстоя- 
ние от последней введенной точки. 


CVPORT 
Целая. Для 11-й версии. 
Номер текушего вилового экрана. 


DATE 


Вещественная. 
Дата/воемя по Юлианскому календарю (стандартный формат OC - 
UNIX). 


Только для чтения. Не сохраняется. 


DIMxxx 


Разные. 
Размерные переменные. Все размерные переменные могут об- 
рабатываться как системные переменные Автокада (см. гл. 3). 
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ОВМООЕ 


Целая. Для 12-й версии. 
Битовый код, определяющий характер изменений в чертеже (только 
для чтения). Является суммой: 
база данных примитивов чертежа ен 
символьная таблица изменена, 
переменные базы данных изменены, 
рамка изменена, | 
6 вид изменен. 


— ох UV - 


DIASTAT 


Целая. Для 12-й версии. 

Способ выхода из диалогового окна: 

0 выход осуществлен с помощью клавиши "Отмена", 
| выход осуществлен с помощью клавиши "Да". 


Только для чтения. 


DISTANCE 


Вещественная. 
Расстояние, вычисленное командой DIST (ДИСТ). 
Только для чтения. Не сохраняется. 


`DONUTID 


Вещественная. Для 12-й версии. 
Внутренний диаметр кольца по умолчанию. Может равняться нулю. 


DONUTOD 


Вещественная. Для 12-й версии. 
Внешний диаметр кольиа по умолчанию не может равняться нулю... 
Если DONUTID больше РОМОТОБР, их значения меняются местами. 
при следующей команде. 


DRAGMODE 


Целая. В рисунок. 
Режим слежения: | 


0 отключен, 4 
1 включен (по запросу), 
2 Авто. 
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ОКАСРТ - 


Целая. В конфигурацию. 
Частота регенерации объекта при слежении. 
Сохраняется в файле конфигурации. 


ОКАСР2 


Целая. В конфигурацию. 
Частота регенерации объекта при быстром слежении. 
Сохраняется в файле конфигурации. 


DWGCODEPAGE 


Строковая. В рисунок. Для 12-й версии. 

Кодовая таблица рисунка. При создании нового рисунка устанавли- 
вается равной системной кодовой таблице и далее не поддерживается. 
Должна отражать кодовую таблицу чертежа и может быть установлена в 
любое значение, допустимое для переменной SYSCODEPAGE, или 
значение "undefined". Сохраняется в заголовке. 


DWGNAME 


Строковая. 

Имя рисунка. Может включать путь доступа операционной сис- 
темы, если он был указан при вводе имени рисунка. 

Только для чтения. Не сохраняется. 


DWGPREFIX 


Строковая. 
Путь доступа операционной системы. 
Только для чтения. Не сохраняется. 


DWGTILED 


Целая. Для 12-й версии. 

Битовый код, определяющий, присвоено ли текущему чертежу имя: 
0 учертежа нет имени, 

|  учертежа есть имя. 


Только для чтения 
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DWG WRITE 


Целая. Для 12-й версии. 

Управляет переключателем “только длЯ чтения" в ‘стандартном диа- 
логовом окне файлов "Открытие рисунка" в команде ОТКРОЙ (OPEN): 

0 открывает файл только для чтения, 

| открывает файл для чтения и записи (значение по умолчанию). 


ELEVATION 


Вещественная. 
Текущий уровень. 


ERRNO 


Целая. 
Код ошибки. Не сохраняется. 


EXPERT 


Целая. 

Режим отображения подсказок типа "Вы уверены?": 

0 все подсказки, 

| _ подавляются подсказки "Выполнять регенерацию?" и "Вы aet- 
ствительно хотите отключить текущий слой?", 

2  подавляются перечисленные выше подсказки, а также "Блок 
уже существуст. Переопределить его?" (команда BLOCK 
(БЛОК) и "Рисунок с этим именем уже сушествует. Заменить 
его?" (команла WBLOCK (ПБЛОК), 

3 — подавляются перечисленные выше подсказки, а также под- 
сказки команлы LTYPE (ТИПЛИН), если пользователь 
пробует загрузить уже загруженный тип линии или создать 

_ НОВЫЙ ТИП ЛИНИИ B paie, в котором этот тип линии уже 
определен, 

4 — подавляются перечисленные выше подсказки, а также под- 

сказки команд UCS Save (ПСК Сохрани) и УРОКТ$ Save 
`’(ВЭКРАН Запиши), если имя, вводимое пользователем, уже 
существует, 
подавляются перечисленные выше подсказки, а также 
подсказки, выдаваемые "Размер Сохрани" и "Размер подави", 
если‘размерный стиль с указанным именем уже существует 
(для 11-й и 12-й версий). Подавление подсказки означает, что 
на нее автоматически дается положительный ответ. 


Ui 
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Впоследствии можно будет использовать значения большие чем 5, 
тем самым расширяя круг подавляемых подсказок. 

В зависимости от значения переменной ЕХРЕКТ могут изменяться 
сценарии, макрокоманды меню, команды Автолиспа и функции команд. 

Значение по умолчанию - 0. Не сохраняется. 


ЕХТМАХ 


Список из двух действительных чисел. 

Правая верхняя’ граница рисунка. Уменьшается только командами 
ZOOM All (ПОКАЖИ Все) или ZOOM Extents (ПОКАЖИ PARER, 

Результат выдается в мировых координатах. 

Только для чтения. 


ЕХТМИМ 


Список из двух действительных чисел. 

Левая нижняя граница рисунка. Уменьшастся только командами 
ZOOM АЦ (ПОКАЖИ Все) или ZOOM Ежем$ (ПОКАЖИ Границы). 

Результат выдается в мировых координатах. 

Только для чтения. 


FILEDIA 


Целая. 
l использовать диалоговые окна, если это возможно, 
2 не использовать диалоговые окна, за исключением случаев, 
°— Когда с помощью тильлы ("~") окно запрашивается в явном 
виде. 


Записывается в файл конфигурации. 


НИЕ TRAD 

Вещественная. 

Задает радиус сопряжения. 
НИМООЕ 


Целая. 

‚ Управление режимом закрашивания: 
| включен, 

= 0 отключен. 
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FLATLAND 


. Целая. Для 10-й версии. 

Эта переменная служит для обеспечения. совместимости трех- 
мерных объектов, созданных старыми версиями Автокада, с данной 
версией; в последующем будет отменена: 

| _ объектная привязка, ОХЕ-формат и Автолисп. соответствуют 

старым версиям, 

0 используются все новые возможности. 


По умолчанию для новых рисунков принимается значение 0, а для 
старых - значение 1. 


Для П-й и 12-й версий отсутствует. 


FRONTZ 


Вещественная. 

Определяет смешение передней секущей плоскости для текушего 
видового экрана в условных единицах. Расстояние до передней секущей 
плоскости от ‘точки зрения определяется вычитанием переменной 
ЕКОМТА из расстояния от точки зрения до пели. Определена, только 
если одновременно включены бит "передняя секушая плоскость” 
переменной VIEWMODE и бит "передняя секушая плоскость не в точке 
зрения". 

Только для чтения. 


GRIDMODE 


Целая. 

Отображение сетки на текущем видовом экране: 
| включена, 

0 отключена. 


GRIDUNIT 


Список из двух действительных чисел. 
Залает интервалы сетки текущего видового экрана по X n Y. 


СИРВОСК 


Целая. Для 12-й версии. 

В конфигурацию. 

Управляет заданием ручек в блоках: 

0 задается только одна ручка в точке вставки блока (значение 
по умолчанию), 
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l ручки появляются у всех примитивов блока. 


GRIPCOL OR 


Целая 1-255. Для 12-й версии. 

В конфигурацию. 

Цвет невыбранных ручек в виде контура. Значение по умолчанию - 
5 (синий). 


СЮРНОТ 


Целая 1-255. Для 12-й версии. f 

В конфигурацию. | 

Цвет выбранных ручек в виде закрашенного квадрата. Значение по 
умолчанию - | (красный). 


GRIPS 


Целая. Для 12-й версии. 

В конфигурацию. ТИР | 

Позволяет использовать ручки выбора примитивов для pa- 
стягивания, перемешения, поворота, масштабирования и зеркального 
отражения: 

0 ручки отключены, 

l ручки включены (задание по умолчанию). 


Для настройки размера ручек и залания зоны притяжения графи- 
ческого курсора к ручке при объектной привязке И перемен- 
ная GRIPSIZE. 


GRIPSIZE 


Целая. Для 12-й версии. 

В конфигурацию. 

Размер квадрата, изображающего ручку. 
Значение по умолчанию - 3. 


HANDLES | | 


Целая. 

Режим присвоения меток O 
0 отключен, 

| включен. 


Только для чтения. 
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HIGHLIGHT 


Целая. 
Выделение объектов при выборе: 
0 отключено, 

1 включено. 


Не сохраняется. | 


НРАМС 


Вещественная. Для 12-й версии. 
Угол наклона образца штриховки по ‘умолчанию. 


HPDOUDLE 


Целая. Для 12-й версии. 

Штрихование крест-накрест для созданных пользователем штри- 
XOBOK: 

0 обычная штриховка, 

1 штриховка крест-накрест. 


НРМАМЕ 


Строковая. Для 12-й версии. 
Имя образца штриховки по умолчанию длиной до 34 символов без 


пробелов. Если значение по умолчанию не залано, возвращает "". Ввод 
точки (.) означает отсутствие значения по умолчанию. 
НРУСАЕ | ` 


Вешественная. Для 12-й версии. 
Масштабный коэффициент образца штриховки по умолчанию. 
Не может равняться нулю. 


INSBASE 


Список из двух действительных чисел. 
Базовая точка вставки рисунка как блока в текущей ПСК 
(устанавливается также командой ВАЗЕ (БАЗА)). 


[М5 МАМЕ 
Строковая. Для 12-Й версии. 
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Имя блока по умолчанию для команд DDINSERT (ДИАЛВСТАВЬ) 
и INSERT (ВСТАВЬ). Должно соответствовать соглашению ‘об именах 
символов. Если значение по умолчанию не задано, возвращает "". Ввод 
точки (.) означает отсутствие значения по умолчанию. 


LASTANGLE 


Вещшественная. 


Конечный угол последней введенной дуги в плоскости ХУ текущей 
ПСК. 


Только для чтения. Не сохраняется. 


[А$ТРОМТ 


‚ Список из двух действительных чисел. | 
Последняя введенная точка, координаты которой выражены в теку- 
щей ПСК (ссылка на нее выполняется знаком "@" во время ввода ко- 
орлинат с клавиатуры). 
Не сохраняется. 


LASTPT3D TRANG 


Список из трех действительных чисел. 
Аналогична LASTPOINT. Эта переменная не используется в 11-й 
и 12-й версиях. 


< [ЕМЯЕМСТН 


Вешественная. | 
Задает фокусное расстояние (в мм), используемое при построении 


перспективы для текущего видового экрана. 
Только для чтения. 
ИМСНЕСК 


Целая. | 
l KC ATpOJIb лимитов включен, 
2 отключен. 


LIMMAX 


Список из двух действительных чисел. 
Задает строковые координаты правого верхнего угла лимитов. 
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LIMMIN 


Список из двух действительных чисел. - 
Задает координаты левого нижнего угла лимижов, выраженные 
в мировых координатах. | 


LOGINNAME 


Строковая. Для 12-й версии. 

Отображает указанное при настройке или введенное при запуске 
Автокадла имя пользователя. 
°— Только для чтения. 


LTSCALE 


Вешественная. | | 
Общий масштабный коэффициент типа линии. 


LUNITS 


Целая. | 
Определяет систему измерения линейных единиц: 
научная, . | 
десятичная, 

техническая. 

архитектурная, 

с дробной частью. 


Ui > LU 5 = 


LUPREC 


Целая. 
Задает число десятичных разрядов или знаменатель в линейных 
единицах. 


МАСКОТКАСЕ 


Целая. Для 12-й версии. 

Средство отладки для ОТЕЗЕТ -выражений: 

0 отключает отладку (по умолчанию), 

| отображает вычисление ОГЕЗЕГ-выражений в зоне подсказок, 
включая выражения из меню и статусной строки. 
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МАХАСТУР 


Целая. Для 11-й и 12-й версий. 

Максимальное число ‘одновременно регенерируемых ВИДОВЫХ 
экранов. 

Только для чтения. 


MAXSORT 


Целая. Для 11-й n 12-й версий. 

В конфигурацию. | 

Максимальное число символов или имен файлов, которое можно от- 
сортировать с помощью команд вывода списков; 

если общее число сортируемых элементов превышает это число, 
сортировка не производится (по умолчанию - 200). Записывается в файл 
конфигурании. | 


МЕМИСИ 


Целая. Для 12-й версии. 

В конфигурацию. 

Управляет переключением “страниц” экранного меню при вводе 

команды с клавиатуры: 

0 при вводе команды с клавиатуры “страницы” экранного меню 
не переключаются, 

| при вводе команды с клавиатуры “страницы” экранного меню 
переключаются. 


МЕМИЕСНО 


Целая. ` 

Биты этой переменной управляют эхо-выводом и подсказками 
меню. Числа, приведенные ниже, устанавливают соответствующие биты 
этой переменной. Для установки нескольких бит следует записать в 
МЕМОЕСНО сумму нужных чисел: 

l _ подавляет эхо-вывод пунктов меню (аналогично переклю- 
чателю ^Р в макроопределениях меню), 
2 подавляет системные подсказки во время действия меню, 
4 — подавляет переключатель ^P эхо-вывода пунктов меню. 


По умолчанию принимается значение 0 (выдаются “BCe пункты 
меню и системные подсказки). ` | 
Не сохраняется. 
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МЕМИУМАМЕ 


Строковая. 

Имя загруженного в данный момент файла меню. Включает. путь 
доступа операционной системы, если он был указан. 

Только для чтения. | 


MIRRTEXT 


Целая. 
, Управление зеркальным отражением текста командой MIRROR 
(ЗЕРКАЛО): 

0 ориентация текста не меняется, 

не - 0 зеркальное отображение текста. _ 


МЕМИМАСЮО 


Строковая. Для 12-й версии. 

Позволяет выводить в статусной строке текстовые строки, напри- 
мер имя текущего рисунка, время и дату или специальные. режимы. 
Можно выводить как простые текстовые строки, так и специальные 
строки языка макросов DIESEL. 


OFFSEİDIST 


Вещественная. Для 12-й версии. = 

Расстояние. смещения по умолчанию. 

При вводе отрицательного значения по умолчанию предполагастея 
"Точка" ("Point"). 


OSMODE 


Целая. 

Биты Этой переменной управляют режимами объектной привязки. 
Числа, приведенные ниже, устанавливают соответствующие биты этой 
переменной. Для установки нескольких бит следует записать в OSMODE 
сумму нужных чисел: | 


ЕМОрони (КОНточка), | ; 
2. MIDpoint (СЕРедина), 
4 CENter (ЦЕНТр), 
$ NODe (УЗЕЛ), 


16 QUäAdrant (КВАдрант), 
32 INTersection — (ПЕРесечение), 
64 Пек (ТВСтавки), у 
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128 PERpendicular .(НОРмаль), 


256 TANgent (КАСательная), 
512 NEArest = (БЛИжайшая), 
1024 QUICK (БЫСтрый). 
ORTHOMODE 
Целая. 


Управление режимом ОКТНО (ОРТО): 
| включен, 
О отключен. 


PDMODE 


Целая. 
Задает символ отображения примитива "точка" (см. гл. 3). 


PDSIZE 


Вещественная. 
Размер символа отображения примитива "точка" (см. гл. 3). 


PERIMETER 


Вещественная. 

Периметр, вычисленный команлами АКЕА (ПЛОЩАДЬ), LIST 
(СПИСОК), DBLIST (БДСПИСОК). 

Только для чтения. Не сохраняется. 


РЕАСЕМАХ 


Целая. Для 11-й версии. 
Максимальное число вершин на одну грань. 
Только для чтения. 


PICKADD 


Целая. Для 12-й версии. 

В конфигурацию. 

Управляет добавочным выбором примитивов: 

0 отключает PICKADD. Последние выбранные индивидуально 
или с помощью рамки примитивы становятся новым набором 
выбора. Предварительно выбранные примитивы в набор не 
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добавляются. Добавить в набор примитивы можно, удерживая 
при выборе клавишу Shift в нажатом положении, 

| включает PICKADD. Все выбранные индивидуально или 
с помошью рамки примитивы добавляются в текущий набор 
выбора. Удалить примитивы из набора можно, удерживая при 
выборе клавишу Shift в нажатом положении. 


Значение по умолчанию - 0. 


РАСКАИТО 


Целая. Для 12-й версии. 
В конфигурацию. 
Управляет автоматическим созданием рамки выбора в ответ на 


запрос "Выберите объекты" ("Select objects"): 


0 отключает PICKADD, нЕ | | 
| _ позволяет создавать рамку выбора (в том числе и секущую) 
автоматически на запрос "Выберите объекты" ("Select objects"). 


РСКВОХ 


Целая. 
В конфигурацию. 
Высота прицела выбора объекта в пикселах. Сохраняется в файле 


конфигурации. 


PICKDRAG 


Целая. Для 12-й версии. | в ` 

В конфигурацию. 

Управляет способом создания рамки выбора: 

0 путем указания двух диагональных точек, определяющих 
рамку. При перемещении устройства указания.из одной точки 
в другую его кнопки опущены (значение по умолчанию - 0), 

| нажав кнопку выбора устройства указания в первой из точек, 
переместиться к другой, удерживая кнопку выбора нажатой, 
и отпустить ее во второй. 


PICKFIRST 


’ Целая. Для 12-й версии. 
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В конфигурацию. 


Управляет способом выбора примитивов, при котором можно 
сначала создать набор выбора, а затем ввести Porna редактирования 
или справок: 

0 отключает предварительный набор, 

| включает предварительный набор (по умолчанию - 1). 


PLATFORM 


Строковая. Для 12-й версии. 
Сообщение только для чтения, указывающее используемую Автока- ` 
дом среду. 


РИМЕСЕМ 


Целая. Для |2. -Ñ версии. 

В рисунок. 

Управляет генерацией типа линии в вершинах двумерных полили- 
ний. Если равна единице, штрихи не обрываются в вершинах полили- 
нии. Если равна нулю, штрихи начинаются и обрываются в каждой вер- 
шине. Не влияет на сегменты полилиний, имеющих переменную 
ширину. i 


PLINEWID 


Вешественная. Для 12-й версии. 
В рисунок. 
Ширина полилинии по умолчанию. Может равняться нулю, 


РОТ 


Строковая. Для 12-й версии. 

В конфигурацию. 

Изменяет текущий настроенный плоттер на основе присвоенного 
ему описания, Делает текущим плоттер, описание которого начинается 
с заланного текста. | 


PLOTTER 


Целая. Для 12-й версии. 

В конфигурацию. 

Изменяет плоттер по умолчанию на основе присвоенного ему цело- 
го (от 0 до максимально присвоенного). Можно создать до 29 конфигу- 
раций. . Деласт текущим плоттер с заданным номером конфигурации 
(номера от | до.28 присваиваются при настройке). 


"ДИАЛОГ.МИФИ“ 185 


POLYSIDES 


° Целая. Для 12-й версии. 
Количество сторон многоугольника по умолчанию для команды 
МН-УГОЛ (РОГУСОМ). Допустимый диапазон от 3 до 1024. 


POPUPS 


Целая. 


Признак наличия расширенного пользовательского интерфейса 
(возможность работы с диалоговыми окнами, строкой меню и 
падающими меню): 

1 — РПИ реализуется, 

0 тскущий драйвер монитора не поддерживает PIM. 


Только для чтения. Не сохраняется. 


PSLTSCALE 


Целая. Для 12-й версии. 

В рисунок. 

Управляет масштабом типа линий в пространстве листа: 

0 специальное изменение масштаба типа линии отключено, 
1 масштаб типа линий зависит от масштаба видового экрана. 


+ 


PSPROLOG 


Строковая. Для 12-й версии. 
Задает имя пролога, считываемого из файла acad.pst при использо- 
вании команды ЭКСПОРТПС. 


PSQUALITY 


 Uenas. Для 12-й версии. 
Управляет качеством отображения изображений PostScript и отри- 
совкой их контурными или закрашенными: | 

0 отключает генерацию изображений PostScript, 

Положительное значение - задает количество пикселов на единицу 
измерения рисунка для разрешения PostScript, 

Отрицательное значение - абсолютная величина задает количество 
пикселов на единицу рисунка. Изображения PostScript 
выводятся контурно (без закрашивания). 
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ОТЕХТМООЕ , 


Целая. 

Режим отображения текста: 

|1  контурный текст, 

0 нормальное отображение текста. 


REGENMODE 


Целая. 

Автоматическая регенерация: 
| включена, 

0 отключена. 


RE-INT 


Целая. Для 12-й версии. | 

Переинициализирует порты ввода/вывода, монитор, дигитайзер, 
плоттер и файл асад.рер, используя описанные ниже битовые коды. Для 
залания нескольких переинициализаций следует ввести сумму значений 
кодов; например, 3 задает переинициализацию порта дигитайзера (1) и 
плоттера (2): | 

|] = порт дигитайзера, | . 
2 = порт плоттера, 
4 = дигитайзер, 
$ 
l 


= монитор, 
6 = перезагрузка РСР-файла. 


SAVEFILE 


Строковая. Для 12-й версии. 
Имя текущего файла для автоматического сохранения. 
Только для чтения. 


SAVENAME 


Целая. Для 12-й версии. 
Имя файла, в который копируется рисунок. 
Только для чтения. 


ЗАУЕПМЕ 


| Целая. Для 12-й версии. 
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Автоматическое сохранение текущего рисунка с расширением .5у$, 
с указанным интервалом в минутах (или 0 для отключения периодичес- 
кого сохранения). Таймер сбрасывается при вводе команд СОХРАНИ, 
СОХРАНИВ и БСОХРАНИ. 


УСКЕЕМВОХЕУ 


Целая. Для 12-й версии. 
`’Количество боксов в зоне экранного меню графического экрана... 
При отключенном экранном меню при настройке ЗСВПМВОХЕЗ равна 
нулю. В системах, позволяющих изменять размер графического окна 
или перенастраивать экранное меню в течение сеанса pena рования 
значение этой переменной может изменяться. 
Только для чтения. 


ССРЕЕММОБЕ 


Целая. Для 12-й версии. 

Битовый код, указывающий состояние экрана АВТОКАДИ. Является 
суммой следующего: 

0 = текстовый экран, 

| = графический экран, 

2 = двухэкранная конфигурация.. 


Только для чтения. 


SCREENSIZE 


Список из двух действительных чисел. 
Задает размер экрана графического монитора 
в пикселах, X и Y. 

Только для чтения. Не сохраняется. 


SHADEDGE 


Целая. Для. 11-й и 12-й версий. 
0 грани тонируются, ребра не выделяются, 


l грани тонируются, ребра рисуются фоновым цветом, 
2 грани не заполняются, ребра рисуются иветом объекта, 
3 грани рисуются цветом объекта, ребра - цветом фона. 
SHADEDIF 


Целая. Для 11-й n 12-й версий. 


Отношение окружающей освещенности к освещенности диффуз- 
ного отражения (в процентах от окружающей освещенности). 


$НРМАМЕ 


Строковая. Для 12-й версии. 
Имя формы по умолчанию. Должно соответствовать принятому. 


соглашению об именах символов. Ввод точки (".") означает отсутствие 
значения по умолчанию. 


SKETCHINC 


Вещественная. 
Шаг приращения в команде ЗКЕТСН (ЭСКИЗ). 


.SKPOLY 


Целая. 

Команда SKETCH (ЭСКИЗ) генерирует: 
0 отрезки, 

|  Полилинии. 


$МАРАМС 


Вещественная. 
Угол поворота сетки шаговой привязки (в текущей ПСК) для теку- 
щего видового экрана. 


SNAPBASE 


Список двух действительных чиссл. 
Начальная точка сетки шаговой привязки для текущего видового 
экрана (в текущей ПСК). 


SNAPISOPAIR 


Целая. 

Текущая плоскость изометрии текущего видового экрана: 
0 левая, | 

| верхняя, 

2 правая. 
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SNAPMODE 


‚ Целая. ‚я | 

Режим SNAP (ШАГ) для текущего видового экрана: 

l включен, 

0 отключен. р 


УМАРУТИ 


Целая. 

Задает тип текущего видового экрана: 
0 стандартный, 

| _ изометрический. 


SNAPUNIT 


Список двух действительных чисел. 
Задает шаг привязки по Х и У текущего видового экрана. 


| SOR TENTS 


Целая. Для 12-й версии. - 

Управляет порядком сортировки: 

0 отключает переменную, 

|1 сортировка при выборе объектов, 

2 сортировка при объектной привязке, 

4 — сортировка при перерисовках, 

$ — сортировка при создании слайлов, 

16 сортировка при регенерациях, 

32 сортировка при черчении, 

64 сортировка при выводе в формате PostScript, 

96 значение по умолчанию - сортировка: при черчении и выводе 
в формате PostScript. 


SPLFRAME 


Целая. | | 

Управление отображением каркаса сплайна при сглаживании по- 
лилинии, определяющей сети поверхности сглаживания (отображается 
либо поверхность сглаживания, либо сеть), а также невидимых краев 
ЗМ граней: | 

0 не отображаются, 

| отображаются. 
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ЭРИМЕЗЕС$ 


Целая. 
Задает число прямых сегментов, которые должны быть сгене- 
рированы для каждого участка сплайна. 


УРИМЕТУРЕ 


Целая. 

Тип сплайна, создаваемого командой PEDIT Spline (ПОЛРЕД 
Сплайн): 
>. квалратичный В-сплайн, 
6 — кубический В-сплайн. 


Остальные значения запрещены. 


ЗИКЕТАВ] 


Целая. 

Задает число интервалов, которые должны быть сгенерированы 
в командах КОГЕЗОВЕ (П-СОЕД) и ТАВЗОВЕ (П-СДВИГ), и плот- 
ность сети в направлении М для команд КЕУЗОКЕ (П-ВРАЩ) 
и ЕОСЕЗОВЕ (П-КРАЙ). | 


SURFTAB2 


Целая. | | 
Задает плотность сети в направлении М для команд КЕУЗОВКЕ (П- 
ВРАЩ) и ЕОСЕЗОКЕ (П-КРАИ). 


_ SURFTYPE 


Целая. i 

Тип поверхности сглаживания, создаваемой командой PEDIT Spline 
(ПОЛРЕД Сплайн): 

> поверхность квадратичного B- -сплайна, 

6 — поверхность кубического В-сплайна, 

$ поверхность Безье. ` 


Остальные значения запрещены. 


_ SURFU 


Целая. 
Плотность поверхности в направлении М. 


ДИАЛОГ-МИФИ* 191 


SURFV 


Целая. 
Плотность поверхности в направлении М. 


$У5СОБЕРАСЕ 


Строковая. Для 12-й версии. 
Указывает системную кодовую таблицу, заданную. в файле acad. xmf. 
Только для чтения. 


ТАВМОРЕ 


Целая. Для 12-й версии. 
0 отключает режим "планшет", 
| включает режим "планшет". 


TARGET 


Список из трех действительных чисел. 

Задает положение цели в координатах ПСК на текущем ВИДОВОМ 
экране. 

Только для чтения. 


ТОСКЕАТЕ 


Вещественная. 
Время и дата создания рисунка (стандартный формат ОС UNIX). 
Только для чтения. 


TDINDWG 


Вещественная. 
'Общее время редактирования (стандартный формат ОС UNIX). 
Тольк › для чтения. 


TDUPDATE 


Вещественная. 

Время и дата последнего редактирования/записи (специальный 
формат, стандартный формат ОС UNIX). | 

Только для чтения. 
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TDUSRTIMER 


Вещественная. 
Таймер пользователя (стандартный формат ОС UNIX). 
Только для чтения. 


ТЕМРРКЕНХ 


Строковая. | 

Путь операционной системы, по которому Автокад помещает 
временные файлы. Если у вас есть возможность использовать виртуаль- 
ный (электронный) диск, то, указав в этой переменной путь доступа к 
нему, вы можете ускорить работу Автокада. Эта переменная не может 
быть установлена из графического редактора (следует воспользоваться 
подменю настройки главного меню). 

Сохраняется в файле конфигурации. 


ТЕХТЕУА! 


Целая. 

Режим анализа ввода в Тех запросах Автокада, где требуется ввод 
текстовых строк. Ввод выражений Автолиспа и Передача значений 
переменных Автолиспа (знак "!"): 

0 недопустим (будет воспринят как текст), 

| допустим (будут переданы Автолиспу). 

Следует иметь в виду, что команда ОТЕХТ `(ДТЕКСТ) с Автолис- 
пом не работает вообще. 

Не сохраняется. 


TEXTSIZE 


Вещественная. 
Задает высоту по умолчанию нового текста в текущей гарнитуре 
(если высота переменная). 


TEXTSTYLE 


Строковая. 
Имя текущей гарнитуры шрифта. 
Только для чтения. 
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THICKNESS 


Вещественная. 
Текущая высота примитивов. 


TILEMODE 


Целая. Для 11- й версии. 

| режим совместимости с версией 10 (использует команду 
ВЭКРАН), 

0 активизирует пространство листа и режим ны с видовыми 
экранами, как с примитивами (использует команду СВИД). 


ТКАСЕУИР 


Вещественная. 
Ширина полосы по умолчанию. 


TREEDEPTH 


Целая. Для 12-й версии. 

Четырехзначный код, указывающий на количество делений на вет- 
ви древовилного пространственного индекса. Первые две цифры - тлу- 
бина узлов в пространстве модели. ABe последние - глубина узлов 
в пространстве листа. Для трехмерных рисунков коды положительные, 
‘для лвумерных - отрицательные. 


ТРЕЕМАХ 


Целая. Для 12-й версии. 

Ограничения максимального количества узлов в пространственном 
индексе рисунка (дерево октантов) для ограничения требования к 
памяти при регенерации. 


UCSFOLLOW 


Целая. 

Режим слежения за изменением системы координат (автомати- 
ческое переключение на вид в плане в новой системе): 

| включен, 

0 выключен. 
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.  ОСУСОМ 


Целая. 

Биты этой переменной управляют отображением пиктограммы систе- 
мы координат текущего вилового, экрана. Для установки бит следует запи- 
carb в ОСЗ СОМ нужное число: 

| _ пиктограмма отображается, 

2 если отображается, то привязана K началу текущей MCK (если 

это возможно). 


UCSNAME 


Строковая. | 
Содержит имя текущей системы координат. 
Только для чтения. 


UCSORG 


Список из трех действительных чисел. 
Начало текущей системы координат в мировых координатах 
Только для чтения. 


UCSXDIR 


Список из трех действительных чисел. . - 
Залает направление X тскушей ПСК. 
Только для чтения. 


UCSYDIR 


Список из трех действительных чисел. 
Задает направление Y тскущей ПСК. 
Только для чтения. 


UNDOCTI 


Целая. Для 12-й версии. 

Код состояния команды ОТМЕНИ: 
возможность отмены команд`-включена, 
возможность отмены: одной команды, 
режим автогруппы включен, 

действует группа. 


с > 65 — 


Только для чтения. 
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ИМООМАККУ 


Целая. Для 12-й версии. 
‹ Количество активных меток, заданных командой ОТМЕНИ Метка. 


Только для чтения. 


UNITMODE 


Целая. 

0 — отображение с дробной частью, в футах и дюймах ив топогра- 
фических единицах, как ранее, 

| отображение с дробной‘частью, в футах и дюймах и в топогра- 
фических единицах в формате ввода. 


ИЗЕК-5 


Пять свободных целочисленных | переменных для использования 
сторонними разработч иками. 


USERRI-5 


Пять свободных вещественных переменных для использования 
сторонними разработчиками. 


USERS 1-5 


Строковая. Для 12-й версии. 

Пять свободных переменных для запоминания строковых данных. 
Максимальная длина строки зависит от используемой системы, но не 
менее 460 символов. 


VIEWCTR i 


Список из двух действительных чисел. | 
Центр текущего видового экрана в координатах ПСК. 
Только для чтения. | 


VIEWDIR 


Список из трех действительных чисел. 

Направление взгляда на текущем видовом экране в мировых ко- 
ординатах. Описывает положение камеры вектором смещения от точки 
цели. | 

Только для чтения. 
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VIEWMODE 


Целая. 

Биты этой переменной управляют режимами отображения текущего 
видового экрана (1 - "Вкл."). Числа, приведенные ниже, в сумме опре- 
деляют значение этой переменной: 

l перспективный BHA, 

2 переднее сечение, 

4 — заднее сечение, 

$ Переменная UCSFOLLOW равна единице, 

16 переднее сечение не в точке зрения. Если этот бит установлен 
в единицу. то расстояние до переднего сечения (FRONTZ) оп- .. 
ределяст передиюю секущую плоскость. Если "Откл.", nepce- 
менная FRONTZ игнорируется и передняя секущая плоскость 
‚проходит через точку установки камеры (T. €. векторы’за каме- 
рой не отображаются). Этот флаг игнорируется, если бит "пе- 
реднего сечения" (2) в состоянии "Откл." 


Только для чтения. 


VIEWSIZE 


Вещественная. 
‚ Залает высоту изображения на текущем виловом экране в условных 
единицах. 
Только для чтения. 


VIEWTWIST 


Вешественная. 
Задает угол поворота вида для текущего видового экрана. 
Только для чтения. 


VISRETAIN 


Целая. Для 12-й версии. 

Управляет цветом и типом линий для слоев внешней ссылки: 
0 первоначальное состояние (значение по умолчанию), 
| установка текущего рисунка. 


УРОИМТХ, Y, Z 


Вещественные. Для 10-й версии. 
Задают направляющие векторы направления взгляда по осям X, Уи 
’ Z в текущем видовом экране в мировых координатах. Таким образом, 


1 
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положение камеры описывается как вектор смещения от цели. Эти 
переменные не будут использоваться в следующих версиях, так как то 
же значение возвращается ОДНОЙ переменной VIEWDIR. 

Только для чтения. 


VSMAX 


Список из двух действительных чисел. 

Задает правый верхний угол "виртуального экрана" текущего 
видового экрана, выраженный в координатах ПСК. 

Только для чтения. 


VSMIN 


Список из двух действительных чисел. . 

Задает левый нижний угол "виртуального экрана" текущего вилово- 
го экрана, выраженный в координатах ПСК. 

Только для чтения. 


WORLDUCS 


Целая. 

Совпаление текущей ПСК с MCK: 
| = совпалает, 

0 не совпадает. 


Только для чтения. 


WORLDVIEW 


Целая. 

Система координат, в которой работают команды DVIEW (ABHI) 
и VPOINT (ТЗРЕНИЯ), действующие в текущей ПСК: 

| текущая ПСК, 

0 мировая система координат. 


ХРЕЕСИ 


Целая. Для 12-й версии. 

Управляет записью файлов .х! (файл журнала внешних КАЛ 
0 — файл не создается, 

1 — файл записывается. 
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Приложение В 


Перечень команд Автокада 


Таблица содержит список всех команд трех версий Автокада 


с кратким описанием их действий и опций. Команды для версий Ши 
\ i 


12 m 


омечены одним знаком "*", только для 12-й - "**", 


АПЕРТУРА [АРЕРТИЕЕ) 


> 
C(I) 


Устанавливает размер прицела режима объектной привязки. 


'АТОПР (АТТОЕН) 
Определяет атрибуты. 


Опции: | 
Управляет вилимостью атрибутов. 


ПС) Присваивает атрибуту статус "постоянный". 
К(У) Управляет режимом проверки. 
У(Р) Задает предварительные установки. 


> 


АТРЕД (ATTEDIT) 


Средство редактирования атрибутов. 


АТЭКР (АТТО/$Р) 
Управляет вилимостью атрибутов на экране. 


Опции: 


В(ОМ) Bce атрибуты отображаются на экране. 
O(OFF) Все атрибуты невидимы. 
Н(М) — Нормальный: видимость каждого атрибута определястся OT- 


дельно. 
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АТЭКСП (АТТЕХТ* 


Экспортирует в файл данные, содержащиеся в атрибутах. 


> Опиши: 

C >à Экспорт B СОЕ-формате. 
S Экспорт в $ОЕ-формате. 
D Экспорт B ОХЕ-формате. 


О(Е) Экспорт атрибутов из выбранных объектов. 


БАЗА (ВАЗЕ) 


Задание базовой точки для последующей вставки блока в другой. 
рисунок. | 


БЛОК (ВОСК 
Из группы объектов создает составной неделимый объект. 

> Опции: 

? Отображает на экране список определенных в рисунке блоков. 
ЬДСПИСОК [BDLIST) 


Выводит на экран информацию, хранящуюся в базе данных. обо 
всех объектах рисунка. 


БСОХРАНИ (@5АУЕ] ** 


Сохраняет рисунок без запроса имени файла. 


ВЕРНИ (КЕБО} . 


Восстанавливает изменения, сделанные предыдущей команлой, €C- 
ли это были команды О или ОТМЕНИ. 
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ВИД (МЕ 


Сохраняет текущее изображение на экране как именованный вид 
или изображает вид на экране. 


> Опции: 
У(О) Удаляет именованный вид из списка сохраненных. 
В(К) Восстанавливает поименованный вид на экране. 

С($) Сохраняет изображение на экране как поименованный вид. 
P(W) Сохраняет как поименованный вид изображение в указанной 
рамке. | 

я ‘Список имен сохраненных вилов. 


ВОССТАН (КЕСО\ЕК)] ** 
Восстановление по возможности поврежденного или испорченного 
рисунка. | | 


х 


ВПАКЕТ (RSCRIPT) 


Возобновляет исполнение прерванного пакета. 


'ВРЕМЯ ['ТИМЕ) | 


Показывает время создания и редактирования рисунка и позволяет 
управлять Таймером пользователя. | 


> Опции: 


ПСО) Выводит на экран тскушие значения таймера. 
В(ОМ) Включает таймер пользователя. 

О(ОЕЕР) Останавливаст таймер пользователя. 

C(R) Сброс таймера пользователя. 


'ВСЕОСВЕЖ [РЕБРАУМАЦ] * 


Перерисовывает изображение на всех видовых экранах. 


ВСЕРЕГЕН (КЕСЕМАЦ) 


Регенерирует изображение на всех видовых экранах. 


= 
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ВСЛОЙ [VPLAVER]) * 


Устанавливает видимость для новых и существующих слоев раз- 
дельно по видовым экранам. 


> Опции: 

? Выводит.список слоев замороженных на выбраном. BILIOBOM 
экране. _ 

З(Е) Замораживает указанные слои на выбранных видовых, экранах. 

Р(Т) Размораживаст указанные слои на выбранных видовых 
экранах. 

С(К) Изменяет видимость указанных слоев на значение по 
умолчанию. — 

Н(М) — Создает новый слой, замороженный на всех видовых экранах. 

В(У) Изменяет видимость по умолчанию на виловом экране лля CY- 


ществующих слосв. 


ВСТАВЬ (INSERT) | И 


Вставляет копию блока в рисунок. 


> Опции: 
ИМЯ Вставляст целый рисунок "имя-файла-рисунка" в тскущий ри- 
сунок. 


имя={ Создает блок из целого рисунка "имя-файла-рисунка". 
*ИМЯ Сохраняет графические примитивы отдельных частсй. 


? Выводит на экран список определенных в рисунке блоков 
(в ответ на запрос масштаба по оси Х). 

y. Определяет масштаб указанием двух точек (угловое залание 
масигтаба) 
(в ответ на запрос масштаба по оси Х). 

XYZ Воспринимается как необходимость задания масштабов по 


осям X, Y, Z. 


ВЫБЕРИ (SELECT) 


Составляет из выбранных объектов набор для последующего выпо- 
лнения команл. 


ВЭКРАН [VPORTS) 


Разделяет графический экран на несколько частей, каждая из кото- 
рых может содержать собственный вид рисунка. 
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> Опции: 


Y(D) Удаляет из списка сохраненных указанную конфигурацию BH- 
довых экранов. 


C(J) Соединяет (сливает) два видовых экрана B ОДИН. 

B(R) Восстанавливает сохраненную конфигурацию видовых экранов. 

3($) Записывает имя текущей конфигурации экрана в список сохра- 
ненных. $ 

O(SI) — Отключает вилимость всех видовых экранов, кроме одного TE- 
кушего. 

2 Делит текущий видовой экран на два видовых экрана. 

3 Делит текущий видовой экран на три видовых экрана. 

4 Делит текущий видовой экран на четыре видовых экрана. 

? Список имен текущей и сохраненных конфигураций видовых 
экранов. 

ГРАФЭКР ['GRAPHSCR) 


При одноэкранной конфигурании переключает монитор в графиче- 
ский режим; команда употребляется в пакетах и при создании`меню. 


ДАКОМ (REDEFINE) 


Восстанавливаст встроенную команду, переопределенную с MOMO- 
щью команды НЕТКОМ. 


ABUL (DVIEW) 


Определяет параллельные и перспективные проекции видов B AHHA- 
мическом режиме. 


> Опции: 


К(СА) Выбор угла поворота камеры относительно цели. 

СЕ(СГ) Устанавливает заднюю и переднюю секущие плоскости. 

Р(О) Устанавливаст расстояние от камеры до цели, включает пер- 
_ спективу. 

СКСН) Убирает скрытые линии B наборе. 

OTK(OFF) —Отключает перспективное изображение. 

ПА(РА) Панорамирование рисунка. 

Т(РО) —Залает точки расположения камеры и цели. 

ЦСТА) —Вращаст вид вокруг направления взгляла. 

B(TW) Вращает вид вокруг направления взгляла. 
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ОТМ(О) Отменяет действие субкоманды ДВИД. 
X(X) Прерывает выполнение команды ДВИД. 
MO(Z) Зуммирование или задание фокусного расстояния. 


ДЕРЕВО (ТКЕЕЗТАТ) ** 


Отображает информацию о текушем пространственном индексе 
рисунка, такую, как количество и глубина узлов в базе данных. Исполь- 
зустся вместе с системной переменной ТКЕЕОЕРТН для увеличения 
производительности при работе с большими рисунками. 


ДИАЛАТОП ([DDATTDEF) ** 


Выводит. на экран диалоговое окно для создания определения ат- 
рибута, включаемого в. качестве текстовой информации в определение 
блока (см. АТОПР). 

ДИАЛАТР [DDLMODES) 


Редактирование атрибутов через диалоговое окно. 


ДИАЛАТЭК (DDATTEXT) ** 


Выводит на экран диалоговое окно для извлечения данных из ри- 
сунка. Допустимыми форматами являются DXF, CDF и SDF (см. 
АТЭКСП). 


_ ДИАЛВСТ [DDINSERT) ** 


Выводит на экран диалоговое окно, позволяющее вставить копию 
предварительно созданного стандартного элемента или файла в текущий 
рисунок (см. ВСТАВЬ). 


'ДИАЛВЫБ (РО5ЕЕСТ| ** 


Вызывает диалоговое окно для задания режимов выбора примити- 
вов, величину прицела выбора и способ сортировки объектов. 


'ДИАЛЕДИН ['DDUNITS) ** 


Вызывает диалоговое окно для задания форматов отображения 
и точности координат и углов (см. ЕДИНИЦЫ). 
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ДИАЛИМЯ [ООКЕМАМЕ] ** 


Вызывает диалоговое окно для переименования гарнитуры шриф- 
тов, слоев, типов линий, блоков, видов, ПСК, конфигураций видовых 
экранов и размерных стилей (см. НОВОЕ ИМЯ). | 

‚ДИАЛПРИВ (DDOSNAP) ** 


Вызывает диалоговое окно для установления текущих режимов 
объектной привязки и изменения величины прицела выборё. объектов 
для привязки (см. ПРИВЯЖИ). 


'ДИАЛПРИМ ['DDEMODES) 


Установка о слоя, цвета, типа ЛИНИИ И ВЫСОТЫ т. диало- 
TOBO окно. 


ДИАЛПСК ([DDUCS) 


Изображает на экране диалоговое окно для управления ПСК. 


'ДИАЛРАЗМ (DDIM) ** 


Отображает на экране серию диалоговых окон для управления про- 
становкой размеров (см. РАЗМЕР). 


ДИАЛРЕД (DDEDIT) * 


Выводит на экран диалоговое окно для редактирования текстов 
и определений атрибутов. 


— ДИАЛРУЧ ['DDGRIPS) ** 


Позволяет через диалоговое окно включать ручки выбора. при- 
митивов и задавать их ивет и величину. _ 


ДИАЛСВОЙ (DDCHPROP) ** 


Позволяет через диалоговое окно изменять цвет, слой, тип линии 
и высоту выбранных примитивов (см. СВОИСТВА). 


'ДИАЛСЛОЙ ['DDLMODESJ) 
Установка характеристик слоя через диалоговое окно. 
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ДИАЛСРЕД (ООКМОРЕ$] 
Установка режимов рисования через диалоговое окно. 


® 


AUCT (DIST) 


Определяет расстояние между двумя точками. 


ДОБАВЬ {XBIND]) * 


Добавляет выбранный набор зависимых от внешней ссылки 
символов в текущий рисунок. 


> Опции: 

Б(В) Блок. 

Р(О) Размерный стиль. 
C(LA) Слой. 


ТОТ) Tun линии. | 
Г($) Гарнитура. 


ДОС (SHELL) 


Предоставляет возможность запуска других программ без выхода из 
Автокала. 


JOCI (SH) 


‚ Предоставляет доступ к внутренним командам ДОС без выхода из 
Автокада. 


ДСЛАЙД (М$ИОЕ) | 


Записывает изображение на экране в слайд-файл. 


ДТЕКСТ (ОТЕХТ) 
Рисует на экране текстовые символы заданного размера и начертания. 


>  Опшии: 


B(J) Запрашивает опции выключки. 
ВПИ(Е) Текст заданной гарнитуры, вписанный между двумя точками; 
высота определяется автоматически. 


U(C) Горизонтальное центрирование строки текста. 
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ВЫ(А) Строка текста заданной высоты выравнивается между двумя 
точками; соответствующая степень растяжения/сжатия вычис- 


ляется автоматически. 
С(М) — Горизонтальное и вертикальное центрирование строки текста. 


П(К) Строка тскста выравнивается по правому краю. 
Г($) Выбор гарнитуры шрифта. 
HJI(BL) Выключка вниз влево. 

НЦ(ВС) Выключка вниз в центр. 
НП(ВК)`Выключка вниз вправо. 
CJI(ML) Выключка посередине влево. 
СЦ(МС) Выключка посередине в центр. 
СП(МК) Выключка посередине вправо. 
ВЛ(ТЕ) Выключка вверх влево. 
ВЦ(ТС) Выключка вверх в центр. 
ВП(ТКВ) Выключка вверх вправо. 


ДУГА [АРС 


Рисуст дугу любого радиуса; метод задания дуги, принимаемый по 
умолчанию, заключается в указании на две ее конечные точки и на точ- 
ку, принадлежащую дуге. 


> Опции: 


У(А) Центральный угол. 

ЦС) Центр. 

H(D) Направление. 

К(Е) Конец. 

ДСП) Длина хорды. 

Р(К) Радиус. 

RETURN Воспринимается (при нажатии в ответ на запрос "Центр") как 
указание совместить начало дуги ‹ с концом последней нарисо- 
ванной дуги или отрезка. 


ЕДИНИЦЫ ['UNITS) | 


Выбор формата и точности представления координат и углов. 


ЗАГРУЗИ (LOAD) 


Загружает файл, содержащий описание определенных пользовате- 
лем форм. 
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> Опции: 


$. Выдает на экран список загруженных файлов описания форм. 


ЗАДЕРЖИ [DELAY] 


Приостанавливает выполнение команды на указанное время; упот- 
ребляется в пакетных файлах. 


'ЗАКРАСЬ [FILL) 


Определяет, будут ли закрашены изображаемые.на экране или Bbl- 
водимые на бумагу полосы, фигуры и полилинии. i 


> Onu: 


B(ON) Полосы. фигуры и полилинии. закрашены. 
O(OFF) . Полосы, фигуры и полилинии только оконтурены. 


ЗЕРКАЛО (MIRROR) 


Рисует зеркальное отображение указанного объекта. 


ЗНАКПСК (UCSICONJ 


Управляет видимостью пиктограммы пользовательской системы 
координат. 


> Опции: 


В(ОМ) Включение отображения пиктограммы ПСК. 

О(ОЕЕ) Отключение отображения пиктограммы. 

ВС(А) Внесение изменений на все видовые экраны. 

B(N) Помещать пиктограмму в левый нижний угол видового экрана. 

Н(ОК) Размещает пиктограмму ПСК по возможности в начальной 
точке текущей ПСК. 


ИЗМЕНИ (СНАМСЕ) 


Изменяст положение, размер, ориентацию в пространстве и другие 
характеристики выбранного объекта. Особенно интересна при работе 
с текстом. ` 


> Опции: 


С(Р) = Общие свойства примитивов. 
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СЛ(ГА) Слой. 

ЦС) Цвет. 

ЕТ) Tun линии. 

B(T) Высота. 

У(Е) Уровень. 
ИЗОМЕТР ['ISOPLANE) 


Задает изом етрическую плоскость для рисования. 


> Опции: 


JI(L) Левая плоскость. 

ПСВ) Правая плоскость. 

B(T) Верхняя плоскость. 

RETURN _ Делает слелуюшую по очереди плоскость текущей. 


ИМПОРТА (DXFIN) 


Загружает файл обмена рисунками. 


ИМПОРТД (DXBIN) 


Вставляет закодированный в двоичном формате файл в рисунок. 


ИМПОРТИ (IGESIN) 


Загружает обменный файл в формате IGES. 


ИМПОРТПС [РМ] ** | 
Загружает файл в формате Encapsulated PostScript (EPS). 


ИНФО [АВОИТ ** 


Через диалоговое окно выводит различную информацию, в том чис- 
ле о версии Автокада, серийном номере и`текстом из файла acad. msg. 


КОЛЬЦО [DONUT] 


Рисует кольца с заданным внешним и внутренним диаметром. 
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КОМПИЛ (COMPILE) ** 


. ОНИ файлы ROP И MPAG TOR 


` КОНЕЦ (END) 


Выход из рисунка с сохранением внесенных изменений. 


КООРД (10) 


Выдает на экране В зоне подсказки координаты указанной ТОЧКИ. 


КОПИРУЙ (СОРИ 
Рисуст копии указанного объекта. 


> Опции: 


Н(М) — Создает. несколько копий указанного объекта. 


КПОЛИ (BPOLY) ** 


Создает полилинию по замкнутому контуру. 


КРУГ (CIRCLE) 


Рисует круг любого заданного радиуса; по умолчанию принят метод 
задания круга по центру и точке на его окружности. 


>  Опиии: 


2Т(ЭР) Задает круг по двум конечным точкам на его диаметре. 
ЗТ(ЗР) Задает круг по трем точкам на сго окружности. 

P(R) 3anaeT круг по радиусу. 

Д(О) = Для указания диаметра вместо запрашиваемого радиуса. 
ККР(ТТК) —Залание круга указанием двух касательных и радиуса. 


КТЕКСТ (Q TEXT) 


При включенном режиме на а экране появляются не символы, а KOH- 
туры текста. 


> _ Опишии: 


В(ОМ) Режим контурного текста включен. 
: O(OFF) Режим контурного текста.отключен. 
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КШТРИХ (ВНАТСН) ** 


Автоматически заполняет определенный контур. образцом > штри- 
ховки с использованием диалогового окна, а также помогает предвари- 
тельно просматривать и многократно подгонять штриховку без выхола 
из команды. 


Лимиты (LIMITS) 


Изменяет лимиты рисунка и проверяет соблюдение этих лимитов. 


> Опции: 


2 точки Устанавливаст лимиты по нижнему левому и верхнему правому 
углам рисунка. 

В(ОМ) Включает проверку лимитов. 

O(OFF) Отключает проверку лимитов. 


> 


ЛИСТ (Р5РАСЕ] * 


Делает текущим пространство листа. 


ЛМАСШТАБ [LTSCALE) 
Устанавливает масштаб для всех типов линий, появляющихся B pH- 
сунке. 
_ МАРКЕР (ВИРМОРЕ) 


Управляет видимостью маркеров на экране при указании точек. 


>  Ошши: 


В(ОМ) Ha экране появляются временные маркеры. 
O(OFF) Маркеры не появляются. 


МАССИВ (ARRAY) 


Производит многократное копирование выбранного объекта, рас- 
полагая копии прямоугольным или круговым массивом. | 


>  Опиии: 


К(Р) Круговой массив. . 
T(R) Прямоугольный массив. 
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МАСШТАБ (SCALE) 


Пропорционально изменяет размеры существующих объектов. 


> Опции: 
C¢R) Изменение размера со ссылкой на BenTiGY существующего 
объекта. 


МВСТАВЬ (MINSERT) 


Вставляет массив копий блока в рисунок. ' 


> Опции: 


ИМЯ Вставляет целый рисунок "имя-файла-рисунка" и формирует из 
вставленных рисунков массив. 

имя=Р Создает блок из целого рисунка "имя-файла-рисунка" и фор- 
мирует из созданных блоков массив. 


? Выводит на экран список определенных в рисунке блоков (как 
ответ на запрос масштаба по оси Х). 

У ’ Определяет масштаб указанием двух точек (угловое задание ма- 
сштаба) (как ответ на запрос масштаба по оси Х). 

XYZ Воспринимается как необходимость задания масштабов по 


осям X, У. Z. 


МЕНЮ [MENU] 


Загружает в рисунок файл меню, содержащий команды Автокада 
(экранное меню). 
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МЕТКИ (НАМОЕЕ$] 


Присваивает уникальный постоянный номер каждому примитиву 
рисунка. 


> Опции: 


В(ОМ) Присваивает метки всем примитивам и устанавливает iie penek 
ную HANDLES, равную единице. 
Y(D) Удаляет ранее присвоенные примитивам метки. 


МНОГОРАЗ (MULTIPLE) 


Вызывает повторение последующей за этой спецификацией коман- 
лы до тех пор, пока она не будет прервана. 


МН-УГОЛ (POLIGON) 


Р исует правильные многоугольники с заданным числом сторон. 


> Опции: 

С(Е) Задание многоугольника указанием одной его стороны. 
О(С) Описанный вокруг окружности. 

В(Г) Вписанный в окружность. 


МОДЕЛЬ (MSPACEJ * 


Делает текущим пространство модели. 


НАСТРВИД (ИЕУ/РЕ$) 


Заданием числа сторон изображающего на экране круг многоуголь- 
ника определяется точноеть изображения и рт регенерации кру- 
гов и дуг. 


НАСТРОЙ (CONFIG) ** 


Позволяет. изменять на текстовом экране настройки монитора диги- 
тайзера, плоттера и рабочих параметров. 


НЕТКОМ [UNDEFINE) 


Пересопределяет встроенную команду. 
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НОВОЕИМЯ (ВЕМАМЕ) 


Изменяет имена гарнитур шрифтов, слоев, типов линий, блоков 


и видов ПСК и конфигураций видовых экранов. 


> Опции: 


Б(В) 


Изменяет имя блока. 


C(LA) —Изменяет имя слоя. 
ТОТ) — Измеияет имя типа линии. 


Г($) 


Изменяет имя гарнитуры. 


ПО) Изменяст имя ПСК. 
ВИ(УГ) Изменяст имя вида. 
ВЭСУР) M3MCHACT имя конфигурации видовых экранов. 
Р(О) Изменяет имя размерного стиля. 
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НОВЫЙ (МЕЛ ** 


Создает новый рисунок. 


O (U) 


Отменяст действие предыдущей команды. 


ОБРЕЖЬ [TRIM] 


Удаляет части примитивов, которые пересекают указанную границу. 


ОЙ (OOPS) 


Восстанавливает стертые ранее примитивы. 


ОРТО ['ORTHO)J 


Включаст режим рисования примитивов только параллельно сетке. 


'ОСВЕЖИ ['REDRAW) 


Перерисовываст текущий видовой экран. , 


ОСИ (AXIS) 


Только для Автокада 10. 
Отображает на apane монитора две шкалы графической' ЗОНЫ. . 


> Опции: 


O(OFF) Отключает видимость направляющих линий. 

В(ОМ) Включает вилимость направляющих линий. | 

Ш($) — Устанавливает интервал делений, равный шагу привязки. . 

А(А) Устанавливает цену деления по оси Х; отличную от цены. деления 


по оси У. 
число — Устанавливает цену деления (0==устанавливается pamai mary: при- 
ВЯЗКИ). = $ 


числоХ Устанавливает цену деления кратно шагу привязки. 


ОТМЕНИ (UNDO) 


Отменяет действ.е нескольких команд; имеет более широкие воз- 
можности, чем команда О. 


> Опции: 


число  Отменяет действие указанного количества команл начиная 
с последней. 

А(А) Авто: любая операция из меню интерпретируется командами О 
и ОТМЕНИ как один шаг. 

О(В) Обратно: восстанавливает состояние рисунка на момент про- 
ставления контрольной точки. 


” 


У(С) = Управление: определяет количество шагов, запоминаемых KO- 
манлами О 
и ОТМЕНИ. 

К(Е) Конец: последовательность команд начиная с метки. 

КО) "Группа" и заканчиваюцщгаяся меткой "КОНЕЦ" воспринимасет- 


| ся командами О и ОТМЕНИ как одна команда. | 

М(М) Метка: устанавливаст метку в протоколе рисунка. 

В(А) Включает все средства ОТМЕНИ. 

НМ). Полностью отключает команды O и ОТМЕНИ и отнимает всю 
информацию команлы ОТМЕНИ, записанную ранее в сеансе 
редактирования. 

О(О) Ограничивает действие команды О или ОТМЕНИ одной 
операцией. | Те 
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ОТРЕЗОК (ИМЕ) 


Рисует прямолинейный отрезок указанной длины. 


> Опции: 


RETURN (Kak ответ на запрос "От точки".) Начало изображаемого 
отрезка совмещается с концом последней нарисованной дуги 
или отрезка (как ответ на‘запрос "К точке:”). 

3(С) Замыкает ломаную (как ответ на запрос "K точке:"). 

O(U). — Отменяет последний нарисованный сегмент. 


П-ВРАЩ (REVSURF] 


Создает трехмерную многоугольную сеть аппроксимацией поверх- 
ности вращения, полученной в результате вращения кривой вокруг за- 
данной оси. 


П-КРАЙ (ЕРСЕЗИВЕ | 


Создает трехмерную многоугольную сеть методом аппроксимации 
участка поверхности Кунса (бикубическая поверхность, полученная HH- 
терполяцией между четырьмя краями). 


П-СДВИГ (ТАВЗИЕЕ) 


Создает многоугольную сеть, аппроксимирующую поверхность, 
полученную сдвигом определяющей кривой вдоль направляющего 
вектора. 


< 


П-СОЕД (RULESURF) 


Создает трехмерную многоугольную сеть аппроксимацией поверхности 
между двумя кривыми. 


ПАКЕТ (SCRIPT) 


Выполняет указанный командный пакет. 


ПАН (РАМ) 


Перемещает окно экрана по рисунку. 
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ПБЛОК (WBLOCK] 


Записывает изображение указанных объектов в отдельный файл на 
ДИСК. | 


> Опции: 


ИМЯ Запись определенного ранее блока в отдельный файл. 


= Присвовние файлу имени выписываемого блока. 
: Запись на диск всего рисунка. 
RETURN Запись указанных объектов. 


‚ПГРАНЬ (РЕАСЕ) ** 

Создает трехмерную сеть произвольной ‘сложности с произволь- 
ными характеристиками поверхности. 

ПЕРЕИН (КЕМ) ** 

Повторно инициализирует порты ввода/вывода, дигитайзер, мони- 
тор, плоттер и РСР-файл. 

ПЕРЕНЕСИ [МОУЕ) 


Параллельный перенос выбранного объекта. 


ПЕЧАТАЙ (PRPLOT) 


Только для Автокала 10. 


Выводит рисунок на матричный принтер. В более поздних версиях 
эти функции выполняет команда ЧЕРТИ. 


ПЛАН (РАМ) 


Устанавливастся точка зрения (0, 0, 1). 


> Опции: 


ТС) План текущей ПСК. 
ПСО) План указанной ПСК. 
М(\) План МСК. 


$ 
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ПЛАНШЕТ (TABLET) 


Настраивает планшет для точного, копирования изображения на бу- 
маге средствами Автокала. 


> Опции: 


В(ОМ) ‘Включает режим "Планшет". 
O(OFF) Отключает режим "Планшет". 
К(САГ.) Калибровка планшета. 

Н(СЕС). Настройка зон планшетного меню. 


Плиния (РИМЕ) 


Рисует двумерные полилинии (последовательности из прямолиней- 
ных и дуговых сегментов с возможным указанием их ширины). 


> Опции: 


M(H) Устанавливает новую полуширину. 
ОТМ(О) Отменяет последний нарисованный сегмент. 
Ш(\У) —Устанавливает ширину. 
RETURN Выход .из команды ЛИНИЯ. 
В режиме отрезка: 
ДУ(А) Переключение в режим дуги. 
3(C) Замыкание прямолинейным сегментом. _ 
ДЛ(Г.) — Длина сегмента (продолжает предылущий сегмент). 
| В режиме дуги: 
У(А) Центральный угол. 
Ц(СЕ) Центральная точка, | 
З(СЬ) o Замыкание прямолинейным сегментом. 
H(D) Направление. 
ОТР(1.) Длина хорды или переключение B режим отрезка. 
Р(К) Радиус. 
B(S)” Вторая точка дуги по трем TOYKAM. > 


ПЛОЩАДЬ (AREA) 
Вычисляет площаль многоугольника, замкнутой полилинии, круга. 


>  Опишии: 


Д(А) Устанавливает режим добавления. 
B(S) =. Устанавливает режим вычитания. 
M(E) ° Вычисляет площадь выбранного объекта.‘ 
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ПОВЕРНИ [RO TATE) 
Поворачивает существующий объект. 


>  Опишии: 


C(R) Поворот относительно существующего угла. 


ПОДЕЛИ {DIVIDE) | 

Делит объект на заданное число частей, помечая их маркерами. 
> Опции: 
Б Вместо маркера вставлястся указанный блок. 

ПОДОБИЕ (OFFSET) 


Создает подобные сушествующим кривые и параллельные линии. 


> Опции: 


число Определение расстояния смещения. 
T(T) Точка, через которую будет проходить линия, подобная задан- 
ной. 


'ПОКАЖИ [ZOOMJ 


Уменьшает или увеличивает изображение объекта на экране. 


> Опции: 


число Масштаб по отношению к первоначальному 1зображению объ- 
екта на экране. 

числоХ Масштаб по отношению ‘к текушему изображению объекта 
° . на экране. | 

числоХЛ (ХР) Масштаб относительно пространства листа. 

В(А) Все. 

ЦС) Центр. 

Д(о) Динамика. 

(E) Границы. 

JI(L) Нижний левый угол. 

T(P) Предыдущий. 

P(W) — Рамка. 

МСУ) Максимальное уменьшение без регенерации. 
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ПОКИНЬ (QUIT) 


Выход из графического редактора и возвращение B Главное меню 
без записи сделанных за сеанс изменений. 


ПОЛОСА (ТРАСЕ) 


Рисует закрашенные линии заданной ширины. 


ПОЛРЕД (PEDIT(2D)) | 


Редактирует двумерные полилинии. 


> Опции: 


3(С) 
Y(D) 


В(Е) 
СГ(Р) 
AU) 
T(L) 


РА(О) 
СП(5) 


O(U) 
II(W) 
хо) 


Замыкает открытую полилинию. 

Убирает сглаживание, т. е. возвращает полилинию после при- 
менения сглаживания в первоначальное состояние: 
Релактирует вершины. 

Сглаживает полилинию, делая из ломаной кривую. 
Добавляет к существующей полилинии. 

Включает генерацию линии с обрывом или без обрыва штри- 
хов в вершинах. l 

Разрывает в указанной вершине замкнутую полилинию. 
Использует вершины полилинии как фрейм для сплайн-ап- 
проксимации (тип определяется значением переменной 
ЗРЫМЕТУРЕ). | 

Отменяет последнее действие редактирования. 

Устанавливает ширину всех сегментов. 

Выход из ПОЛРЕД. 


В режиме редактирования вершин: 


РА(В) 
В(С) 
BC(J) 
ПЕ(М) 
C(N). 
П(Р) 
PE(R) 
BbI(S) 
K(T) 
Ш(\) 
ХХ) 
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Устанавливает первую вершину для разрыва. 

Выполни (разрыв или выпрямление). 

Восставляет новую вершину после текущей. 

Пересносит текушую вершину в указанную точку. 
Устанавливает следующую по порядку вершину текущей. 
Устанавливает предыдущую вершину текущей. 
Регенерирует изображение полилиний. | 

Устанавливает первую вершину для выпрямления. 
Устанавливает касательное направление для текущей вершины. 
Устанавливает новую ширину для следующего сегмента. 

Выход из команды или прерывание процесса выпрямления или 
сглаживания. 


ПОЛРЕДЗМ} РЕБ 36] 


Редактирование трехмерных полилиний. 


> Опции: 

3(C) Замыкает открытую полилинию. 

У(О) Убирает сглаживание. 

В(Е) Редактирование вершин (субкоманды описаны ниже). 

РА(О) —Разрывает в указанной вершине замкнутую полилинию. 

СП($) Использует вершины полилинии как каркас для сплайн-ап- 
проксимации (тип определяется значением переменной — 
ЗРЫМЕТУРЕ). C 

O(U) Отменяет последнее действие редактирования. 

X(X) Выход из команлы ПОЛРЕД. 

_ В режиме редактирования вершин: 

РА(В) —Устанавливает первую вершину для разрыва. 

'B(G) Выполни (разрыв или выпрямление). 

BC(J) — Вставляет новую вершину после текущей. 

ПЕ(М) Переносит текущую вершину в указанную точку. 

C(N) Устанавливает слелуюшую по порядку вершину текущей. 

T(P) Делает текущей прелылущую вершину. | 

РЕ(К) — Регенерирует полилинию. 

ВЫ($) Устанавливает первую вершину для выпрямления. | 

X(X) Выход из процесса редактирования или преривание выпрямле- 


ния или сглаживания. 


ПОЛРЕД (сеть) (PEDIT) (Mesh) 


Редактируст трехмерные многоугольные сети. 


> Опции: 
_ У(О) Убирает сглаживание и восстанавливает первоначальный вид 
сети. 
В(Е) Редактирует вершины полилинии. 
М Размыкает или замыкает сеть в направлении М. 
НОМ) Размыкает или замыкает сеть в направлении М. 
С($) Сглаживает поверхность (тип определяется значением 
SURFTYPE). 
O(U) Отменяет последнюю операцию редактирования. 
ХХ) Выход из команды ПОЛРЕД. 
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'ПОМОЩЬ ('НЕР) 


Выводит на экран список команд и форматы ввода’данных; можно 
применять для получения справки по указанной команде. 


'ПРИВЯЖИ ['OSNAP) 


Геометрически точное совмещение указываемых точек с характер- 
ными точками объектов. 


>  Оишции: 


ЦЕН(СЕМ) К центру дуги или круга. ` ° 
КОН(ЕМО) К ближайшей конечной точке отрезка или дуги. 
TBC(INS) K точке вставки текста, блока, формы. 
ПЕР(ПМТ) K точке пересечения отрезков, дуг, окружностей. 
CEP(MID) К середине дуги, отрезка. 
БЛИ(МЕА) K ближайшей видимой точке дуги, круга, отрезка 

| или точке. 
УЗЕ(МОО) К узлу (точке). 
НИЧ(МОМ) Ничего (Откл.). 
НОР(РЕВ) Нормаль К дуге, отрезку или кругу. 
КВА(ОЧА) К квадранту дуги или круга. 
БЫС(ОЧГ) Быстрый режим (возвращается не ближайшая 

к перекрестью, а первая найденная точка). 

КАС(ТАМ) Касательная к дуге или окружности. 


ПРОВЕРЬ (АЦОП] * 
`Выполняет проверку целостности рисунка. 


> Опции: 


ДСУ) Исправляет замеченные ошибки. 
Н(М) — Только сообщает о замеченных ошибках. 


'ПРОДОЛЖИ [RESUM) 


Продолжает прерванный процесс выполнения пакета. 


ПЗАКР [PSFILL) ** 


Заполняет контуры (двумерные полилинии) образцом закраски‘ 
формата PostScript, определенным в файле поддержки PostScript 
Автокада (akad.pst). 
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ПСК (UCS) 
Определяет или видоизменяет текущую ПСК. 


> Опции: 


У(р) Удаляет одну или более записанных систем: | 

О(Е) Устанавливаст ПСК с тем же напала выдавливания, что 
' © CM yY указанного объекта. j 

Н(О) Перемещаст точку отсчета текушей ПСК. 

П(Р) Делает предыдущую ПСК текущей. 

3(R) Заменяет тскушую ПСК на записанную ранее. 

С($) Сохраняст текущую ПСК. | 

B(V) Поворачиваст текущую ПСК, совмешая направление взгляда 

с направлением ‘оси’ Z. ii, 
M(W) —Устанавливаст текущую нем, эквивалентную MCK. 


1, 9 


X Поворачиваст текущую ПСК! вокруг ce оси X. 

Y Поворачивает текушую ПСК’вокруг ee ocu Y. 

Z Поворачивает тскушую ПСК; вокруг ее оси Z. 

ZO(ZA) Задание ПСК по точке отсчета и положительному направле- n 
нию оси Z. | 

3 Задание ПСК по трем точкам: началу отсчета, точке на поло- i 
жительном направлении оси’Х и аналогичной точке на ‚оси У. 


2 Список имён сохраненных ПСК: 


ПССЛЕДИ (Р5ОКА G) + 


Управляет режимом слежения при динамическом размещении изо- 
бражения, импортируемого из Рои$спри-файла командой ИМПОРТПС. 


> Опции: 


К(О) При слежении рт только габаритный 
прямоугольник. "у G 5 
` При слежении отображается ibimbdaämios изображение. 
РАЗМЕР (DIM) 
Выход в режим проставления размеров, позволяющий Дополнить 
рисунок размерными и выносными линиями. 
РАЗМЕР1 [DIMI] | ео жа ны 


Вход в режим проставления одного’ размера, затем выход В т 
НЫЙ командный режим. 
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РАЗМЕТЬ (МЕАЗИЕЕ] 


Ставит метки на выбранном объекте через указанные интервалы. 


> Опции: 
Б(В) Вместо метки будет вставлен указанный блок. 
РАЗОРВИ [BREAK] 


Стирает часть объекта или разрывает его на две части. . 


> Опции: 


П(Е) Переопределяет первую указанную точку. 


РАСТЯНИ [5ТКЕТН) 


Позволяет растягивать объект. перемещая одну из его частей, но не 
разрывая его. | 


РАСЧЛЕНИ (EXPLODE) 


Расчленяет блок или полилинию на составляющие элемент bI, не 
изменяя геометрии объекта, но удаляя определение блока или полили- 
НИИ. 


РЕГЕН (РЕСЕМ) 


Регенерирует изображение в текущем видовом экране. 
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'РЕГЕНАВТО ('ВЕСЕМАИТО) 


Определяет, будет ли. произведена регенерация, обусловленная вы- 
полнением другой команды. 


> Опции: 


В(ОМ) Автоматическая регенерация без сообщений. 
О(ОЕЕР) Регенерация с разрешения пользователя. 


$ 


СВИД (MVIEW) 
Создает видовые экраны и управляет ими. 


> Onun: 


В(ОМ) Включает выбранные видовые экраны и регенерирует на`них 
| изображения объекта. 
O(OFF) Отключает.изображение на выбранных видовых экранах. 
С(Н) Удаляет невидимые линии при выводе на плоттер в пространс- 
тве листа. | 
ВП(Е) Создает единый видовой экран, вписанный в текущий вид 
. Пространства листа. 


2 Создает два видовых экрана, вписанных в заланную область. 
3 Создает три видовых экрана, вписанных в заланную область. 
4 Создает четыре равных виловых экрана, вписанных в заданную 
область. р | 
TI(R) Переводит конфигурации видовых экранов, сохраненные 
командой ВЭКРАН, в совокупности примитивов: пространства 
листа. 
точка — Создает новый виловой экран внутри области, заданной двумя 
точками. 
СВОИСТВА [СНРКОР) 
Изменяет свойства выбранных объектов. 
> Опции: F 
LU(C) . Цвет. 


ТЕТ) Tan линии, 
СЛ(ГА) Слой. 
B(T) Высота. 
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'СЕТКА ['GRID) 


Изображает на экране сетку из точек с заданным. ана меж- 
ду НИМИ. | 


> Опции: 


В(ОМ) Включает видимость сетки. 

_О(ОРЕ) Отключает видимость сетки. 

Ш($) — Устанавливаст интервал равным шагу привязки. 

А(А)- — Устанавливаст отличные друг.от друга интервалы по осям. 
число — Устанавливает интервал сетки (0=шаг привязки). 

числохХ Залает интервал сетки кратным шагу привязки. . 


СКРОЙ (НОЕ) 


Удаляет скрытые линии на трехмерном изображении. объекта. 


CANL (VSLIDE) 
Изображаст на экране содержимое ранее созданного слайд-файла. 


> Опции: 


имя. Показывает на экране содержимое файла "имя". 
*ИМЯ Загружаст слайл-файл для употребления следующей командой 
СЛАЙД. 


СЛЕДИ [ ОКА GMODEJ) 
f Включает и отключает режим динамического отсдеживания, приме- 
няющийся при выполнении некоторых команд. 
В(ОМ) Ввод требований "СЛЕДИ" при необходимости. 
O(OFF) Игнорирование требования "СЛЕДИ". 


А(А) Устанавливает автоматический режим: отслеживание включаст- 
ся без запроса. 


СЛОЙ ['LAYER) 


Создает в текущем рисунке именованные слои и присваивает им 
LIBET H тип линии. | 


> Опции: 

ЦС) Присваивает указанному слою цвет. 

3(F) ° Замораживает слои. 

T(L) Присваивает указанному слою тип линии. 

С(М) — Делает текущим слой; если такого слоя не существует, создает 
его. | 


НМ) — Создает новые слои. 

В(ОМ) Включает видимость слоев. 

O(OFF) Отключает видимость слоев. 

У($) Устанавливает тскушим существующий слой. 

Р(Т) Размораживает слон. 

? Вылает на экран список определенных в рисунке слоев, их CO- 
_ стояние, цвет и тип линии. 

A(U) Разблокирует слой. 


СОПРЯГИ (FILLET) 


Построение сопряжения двух отрезков, дуг или кругов заланного 
радиуса. 


>  Опиии: 


ПОЛ(Р) Сопряжение межлу собой отдельных сегментов одной полили-' 
НИИ. 
РАД(В.) Установка радиуса сопряжения. 


СОТРИ (ERASE) 


Удаляет примитивы из рисунка. 


СОХРАНИ (SAVE) 


Записывает сделанные в ссансе редактирования изменения в файл, 
не выходя из rpa praeo kan редактора. 


СОХРАНИВ (бАУЕА$)} ** 


Аналогично команде СОХРАНИ, но при этом переименовывает 
текущий рисунок. 
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СПИСОК (LIST) 


Выводит`на экран информацию о’ выбранном объекте, содержащу- 
юся в базе данных рисунка. 


ССЫЛКА (XREF) * 


Использует другие рисунки Автокада без их фактического добав- 
ления в текущий рисунок и без изменения их содержания. 


> Опции: 

В(А) Вставляст новую внешнюю ссылку или копию вставленной 
ранее либо освежает изображение обновленного вставленного 
рисунка. 

Д(В) Делает внешнюю ссылку постоянной частью текущего 
рисунка. | 


У(О) Удаляет внешнюю ссылку из текущего рисунка. 

П(Р) Позволяет просмотреть и отредактировать имя файла, исполь- 
зуемое при вставке внешней ссылки. 

О(К) Обновляст одну. или несколько внешних ссылок без перегрузки 
рисунка и освежает их изображение. 

? Перечисляет все внешние ссылки в текущем рисунке и 
рисунок, связанный с каждой из них. 


СТАТУС ['STATUS) 


Выводит на экран текущую информацию о рисунке и режимах. 


СТИЛЬ (STYLE) 


Создание новых гарнитур шрифта, пользователю предоставляется 
возможность выбрать шрифт, его направление, наклон и степень растя- 
жения. 


> Опции: | 
? Выводит на экран список гарнитур, определенных в рисунке. 
ТЕКСТ (TEXT) 


Позволяет создавать в рисунке текстовую информацию, которая 
выводится на экран после завершения команды. 
Подробное описание опций - см. команду ДТЕКСТ. 
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ТЕКСТЭКР [TEXTSCR) 


При одноэкранной конфигурации переключает в текстовый режим 
монитор; команда употребляется в пакетных файлах и при создании 
меню. | 


ТЕНЬ (SHADE) * 


Строит тонированное изображение модели в текушем видовом 
экране. 


” 


ТЗРЕНИЯ [VPOINT] 
Выбор в пространстве точки зрения на объект. 


> Опции: 


П(К) Определение точки зрения заданием двух углов поворота. 
RETURN . Выбор точки зрения поворотом тройки осей координат. 
х,у.7. Задание точки зрения ее координатами. 


ТИПЛИН ('ИМЕТУРЕ) 


Определение типа-линии как. последовательности штрихов, точек 
и пробелов; загрузка его из библиотеки и присвоение последующим на- 
рисованным объектам. 


>  Опиии: 


? Вывод на экран списка имен типов линий, содержащихся 
в библиотеке. 
С(С) Создание определения типа линии. + 
3(L) Загрузка определения типа линии. 
У($) Установка типа линии текущим для последующего рисования. 


ТОЧКА (POINT) 


Рисует отдельные точки. 


УДАЛИ (PURGE) 


Удаляет из рисунка. ненужные блоки, формы, гарнитуры шрифтов, 
слои, блоки и типы линий. 
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> Опции: 


В(А) Удаляет все ненужные поименованные объекты. 
Б(В) Удаляет ненужные блоки. | 
С(ГА) Удаляет ненужные слои. 

ТЕТ) Удаляет ненужные типы линий. 

(SH) Удаляет ненужные формы. 

(ST) — Удаляет ненужные атрибуты. 

P(D) Удаляет ненужные размерные стили. 


УДЛИНИ [EXTEND] 


Удлиняет отрезок, дугу или полилинию до пересечения с другим 
объектом. 


УРОВЕНЬ (ELEV) 


Устанавливает уровень и высоту для вновь создаваемых объектов. 


'УСТПЕРЕМ ('ЗЕТИАК) 


Дает возможность вывести на экран или изменить значения систе- 
мных переменных. 


ФАЙЛЫ (FILES) 


Осуществляет работу с файлами на диске. 


PACKA (СНАМЕЕК] 
Снимает фаску с угла, образованного пересечением двух отрезков. 


> < Опции: 


ДГ.) Устанавливает длину фасок. 
ПОЛ(Р) Снимает фаску с полилинии. 


ФИГУРА (SOLID) 


Рисует закрашиваемые многоугольники. 


Фильм [FILMROOL) | 
Создает файл для дальнейшей его загрузки в АВТОШЕЙД. 
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ФОРМА (SHAPE) 


Рисует ранее определенные формы. 


> Опции: 


? Слисок имен доступных форм. 


LIBET ['COLOURJ 


Устанавливает цвет вновь создаваемого примитива. 


> Опции: 


число ` Устанавливает цвет объекта. 

ИМЯ Устанавливает цвет объекта; стандартное имя цвета. 
ПОБ(ВУВ) Присваивает цвет "ПОБлоку". 

ПОС(ВУТ.) `Присваивает цвет "ПОСлою". 


ЧЕРТИ (PLOT) 
Вывод рисунка на плоттер. 
ШАГ ('$МАР) 


Устанавливает шаг для ввода точек c ПОМОЩЬЮ м. что об- 
легчает указание и делает его точным. 


> Опции: 


число — Устанавливает шаг привязки. 

В(ОМ) Включает режим ШАГ. 

O(OFF) Отключает’‘режим ШАГ. 

А(А) Устанавливает различный шаг по разным осям. 
ПСВ) Поворачивает сетку шаговой привязки. 


T(S) Выбор типа изометрического стиля. 
ШТРИХ (HATCH) | 
Осуществляет штриховку и заполнение областей. 
> Опции: 
ИМЯ Использует для штриховки образец, имя которого указано. 
C(U) Использует для штриховки простой образец, создаваемый 
пользователем. 


? Выводит на экран названия имеющихся рано. 
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ЭКСПОРТА (DXFOUT) 
Записывает файл обмена рисунками на диск. 


> Опции: 


Д(У) = Записывает файл в двоичном формате. 
О(Е) Только выбранные объекты. 
0-16 Количество знаков после запятой. 


ЭКСПОРТИ (СЕЗОИТ 


Записывает на диск обменный файл в формате IGES. 


ЭКСПОРТПС (РОЦИТ ** 

Экспортирует текущий вид рисунка в файл в формате Encapsulated 
PostScript (EPS) 

ЭЛЛИПС (ELLIPSE) 

Рисует эллипсы. 


> Опции: 


ЦС) По центру. | 
ПСВ) По эксцентриситету указанием угла поворота вокруг второй 


оси. 
И(Г) Рисует круг на текущей изометрической плоскости. 
ЭСКИЗ (SKETCH) 
Выполнение эскизов "от руки". 
> Опции: 
Р(С) Продолжает эскизную линию начиная с конечной точки пре- 


дылущей линии. . 
С(Е) Стирает временные (незаписанные) эскизные ЛИНИИ. 
П(Р) Поднимает/опускает перо. 
О(О) Выход из команлы с отменой временных линий. 
3(R) Запись временных линий без выхода из команды. 
X(X) Запись временных линий с последующим выходом 
из команды. | 
Рисует линию до указанной устройством указания’точки. 
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3-[PAHb (ЗБЕАСЕ) 


Рисует участок трехмерной плоскости. 


> Опции: 
H(I) Делает указанный край невидимым. 
_ 3-ПОЛИ (3DPOLY] 
Создание трехмерных полилиний. 
> Опции: 
3(С) Замыкает открытые полилинии. 


O(U) = Отменяет (удаляет) последний НИЕ сегмент. 
КЕТОКМ Выход из команды. 


3-СЕТЬ (ЗОМЕЗН) 


Задает трехмерную многоугольную сеть указанием ее размера 
(в терминах М, М) и положение каждой ее вершины. 
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практической работы на компьютерах ОДНОНЕДЕЛЬНЫЕ КУРСЫ 
IBM РС. 1. Изучение графической среды | 
а Занятия проводятся под руководством MICROSOFT WINDOWS | 
высококвалифицированных препода- 2. Работа с текстовым процессором | 
вателей Московского инженерно-физи- WORD FOR WINDOWS 
‘ческого института и Учебного центра . 3. Использование ОНЫХ 
‚а Оплата производится по наличному или таблиц Microsoft EXCEL 
безналичному расчету. 4. Использование TIME LINE для 
в Окончившим курсы выдается удосто- планирования и управления проектом. | 
верение-сертификат международного ‘ 5. Программирование на АВТОЛИСПЕ | 
о и | (Автокад). 
в Учебный центр: проводит занятия 6. Программирование на PAL 


на базе Заказчика, 
(в среде СУБД Рагадох). 


ДВУХНЕДЕЛЬНЫЕ, КУРСЫ 7. - Работа с графической системой 
1. Практическая работа на компьютерах . ‚® COREL DRAW. 
семейства IBM РС в операционной 8. Настольная издательская система 
среде MS-DOS (начальный курс). | РАСЕ МАКЕН. 
2. Основы системного программиро- 9. Локал ьные ‚сети. 
вания на языке АССЕМБЛЕРА. 10. Диагностика неисправностей и 
3. Программирование под DOS на С++ = _ вопросы модернизации IBM РС. 
(начальный курс). 11. Практическая работа с СУБД FOXPRO: 
4. Программирование под DOS на , C++ 12. Изучение ОС UNIX. 
(для знающих С). 13. Программирование на VISIAL BASIC 


5. Программирование под WINDOWS 
на BORLAND С++ (начальный курс). 


Москва, ул. Москворечье, 31, корт. 2 
Телефон: (095) 320-30-88 
Телефакс: (095) 3243055 


оО O O OO 


O00000 


САПР c 1988 года 


AUAAOT A&C 


ПРОФЕССИОНАЛЬНОЕ ОБОРУДОВАНИЕ ДЛЯ ПРОФЕССИОНАЛОВ 


© Машиностроение и приборостроение 
© Архитектурно-строительное проектирование 
O Геоинформационные системы (ГИС) 


Вашим услугам: 
Системная интеграция; 
Внедрение лучшего оборудования 
и программного обеспечения; 
Комплектация рабочих мест 
по спецификации заказчика; 
Гарантийное и послегарантийное 
обслуживание 


Для Вас: 


Рабочие станции на базе Pentium; 
Плоттеры - перьевые, карандашные, 
лазерные, струйные, электро и тер- 
мографические формата А4 - А0; 
Сканеры и сканирующие головки; 
Мониторы от 15 до 21 дюйма; 
AutoCAD R12, R13; 

Пакеты растровой и векторной 
графики Vectory и SpotLight 


Среди наших клиентов: 
О Московский радиотехнический завод; 
О Новотроицкий комбинат; 
(С) Завод "Кристалл"; 
О ВНИИПИ "Морнефтегаз"; 
О АО "Метрогипротранс"; 
О Комбинат "Южуралникель"; 
© Рязанский нефтеперерабатывающий 
завод; 
O Пермьгражданпроект; 
© Моспроект 2; 
С) Калугапутьмаш; 
О АО "Золото Чукотки"; 
С) Волго-донское пароходство 


Лрисоединяйтесь!/ 


Первый в СНГ официальный дистрибутор фирм: 
Summagraphics, Mutoh, Aydin Controls, Autodesk 
Дилер Calcomp, Rastrex, Philips, Vidar 


Summagraphics 


121019, Москва, Центр, ул. Фурманова, 6-19 
Тел.: (095) 203 6924; 291 2526; Факс: (095) 291 2352 


